Дано вещественное число А и целое число N (>0) Вывести А в степени N: А в степени N=АААА ... А (числа А перемножаются N раз).

Question

Кося

24 февраля, 12:33

+1

Ответы (1)

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

Стоян · Answer 1

var a, k:real;

n:integer;

begin

readln (a, n) ;

k:=a;

while n1 do begin

n:=n-1;

a:=a*k;

end;

writeln (a) ;

end.

Дано вещественное число А и целое число N (>0) Вывести А в степени N: А в степени N=А*А*А*А ... * А (числа А перемножаются N раз).