Дано целое число а и натуральное (целое неотрицательное) число n. Вычислить а в степени n без использования функции Power.

Необходимо составить программу, при исполнении которой значения переменных а и n не меняются, а значение некоторой другой переменной (например, b) становится равным а в степени n. (При этом разрешается использовать и другие переменные.)

var a, b, kol, i : real;
begin
readln(a, b);
kol := exp(ln(a) * b);
writeln(kol : 1 : 0);
end.