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

Ответы

Ответ дал: 111lord
0

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.

Похожие вопросы