На Паскале написать программу, которая вводит числа А и N и вычисляет А^N
На Паскале
написать программу, которая вводит числа А и N и вычисляет А^N
Гость
Ответ(ы) на вопрос:
ГостьVar
A,P:real;
N:integer;
Begin
Write('A(вещественное число) = ');
ReadLn(A);
Write('N(целое число) = ');
ReadLn(N);
P:=1;
For N:= 1 to N do
P:=P*A;
WriteLn(A,'^',N,' = ',P);
End.
Не нашли ответ?
Похожие вопросы