function Pow(A, St: Integer) : Integer - объявляется функция Pow, которая принимает 2 аргумента A и St типа integer, а также сама функция возвращает значение integer
Далее объявляется переменная I типа Integer
begin - начало тела функции
Result := 1; - переменной Result присваивается значение 1
Далее идёт ветвление:
Если St = 0 , то переменной Result присваивается значение 1
В противном случае идёт цикл от I = 1 до St, где каждый шаг увеличивает переменную Result в A раз
словом end; заканчивается тело функции
Короче говоря, данная функция возводит число A в степень St