Информатика, опубликовано 2018-08-22 20:05:13 by Гость
Дано вещественное число А и целое число N(>0) Вывести А в степени N: А в степени N=А*А*А*А...*А(числа А перемножаются N раз).
Ответ оставил Гость
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.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.