дано целое число X и натуральное N. составить алгоритм вычисления Х в степени N . Написать программу на паскале.

1

Ответы и объяснения

2013-05-30T16:53:08+00:00

Program m1;
Var x,n,i:integer;
begin
Readln (x,n);
For i:=1 to n do begin
x:=x*x;
end;
Write ('x=',x);
readln;
end.