Дано вещественное число А и целое число N(>0) Вывести А в степени N: А в степени N=А*А*А*А...*А(числа А перемножаются N раз).
Ответы на вопрос
Ответил Kitsu
0
var a,k:real;
n:integer;
begin
readln(a,n);
k:=a;
while n<>1 do begin
n:=n-1;
a:=a*k;
end;
writeln(a);
end.
Новые вопросы
История,
6 лет назад
Математика,
6 лет назад
Биология,
9 лет назад
Литература,
9 лет назад
Алгебра,
10 лет назад