Вычислить y=a^n по формуле y=a*a*a**a (всего n раз).значение a и n задайте произвольно.(паскаль)

lenichk lenichk    1   28.07.2019 15:10    0

Ответы
CloudSmile CloudSmile  31.08.2020 01:24
Можно процесс ускорить чутка
ПОКАЗАТЬ ОТВЕТЫ
nastusha510 nastusha510  31.08.2020 01:24
Var a, n, s, i: integer;
begin
writeln ('Введите а');
readln (a);
writeln ('Введите n');
readln (n);
s:= 1;
for i:= 1 to n do
s:= s*a;
writeln (s);
end.
Вычислить y=a^n по формуле y=a*a*a**a (всего n раз).значение a и n задайте произвольно.(паскаль)
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика