Напишите алгоритм возведения числа а в натуральную степень n

Question

Напишите алгоритм возведения числа а в натуральную степень n

Answer 1

Var a,b,n:real;
begin
read(a,b);
n:=exp(b*ln(a));
writeln(n:3:3);
end.

Comments

Можно попроще? И русскими буквами