Дано действительно x, не равное 0, и натуральное n. вычислить x^n, используя цикл for информатика

суперкот14 суперкот14    2   02.10.2019 22:20    2

Ответы
1Kotejka1 1Kotejka1  09.10.2020 12:38

Var

n,x,s,i:integer;

Begin

Readln(x,n);

s:=1;

For i:=1 to n do

s:=s*x;

Writeln(s);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика