Функция возведения в степень - Pascal

Формулировка задачи:

Описать функцию степень(x,n) от вещественного x и натурального n, которая вычисляет (через умножение) величину xⁿ, и использовать ее для вычисления выражения b=3.7⁹+(a+1)^-5.

Решение задачи: «Функция возведения в степень»

Листинг программы

var a: Real;
begin
  Write('a: '); ReadLn(a);
  WriteLn('b = ',Pwr(3.7,9)+Pwr(a+1,-5));
end.

Объяснение кода листинга программы

Создается переменная a типа Real.
Выводится на экран текст a: с помощью Write.
Значение переменной a считывается с клавиатуры с помощью ReadLn.
Выполняется вычисление выражения Pwr(3.7,9)+Pwr(a+1,-5).
Результат вычисления выводится на экран вместе с текстом b = с помощью WriteLn.
Программа завершается.