Напишите функцию возведения в степень по формуле a^n = Exp(Ln(a)*n). Используйте её в программе для возведения в нужную степень введённого с клавиатуры числа — Pascal(Паскаль)

function step(a,n:real):real;
begin
step:=Exp(Ln(a)*n);
end;
var a,n:real;
begin
writeln('Введите число');
readln(a);
writeln('Введите степень');
readln(n);
writeln(step(a,n):5:2);
readln;
end.