Question

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

Answer 1

var s,x,n,i:integer;

Begin

  read(x,n);

s:=1;

  for i:= 1 to n do

    s:=s*x;

  writeln(s);

End.