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

Question

Феофилакт

21 декабря, 03:21

+1

Ответы (1)

Знаете ответ на вопрос?

Васа · Answer 1

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.