Question

Дано целое число X и натуральное N. Составьте алгоритм вычисления X^N. Проверьте алгоритм трассировкой. Напишите программу на Паскале.

Answer 1

m:=x;
for i:=1 to n do
   x:=x*m;
writeln(x);