Даны натуральные числа a и n .вычислить a*(a+1)**(a+n-1)

АлинаБречко АлинаБречко    1   29.08.2019 14:40    0

Ответы
иван1159 иван1159  06.10.2020 03:04
Var
   A,N:integer;
   P:real;
Begin
Write('A = ');
ReadLn(A);
Write('N = ');
ReadLn(N);
P:=1;
For N:= 0 to N-1 do
    P:=P*(A+N);
WriteLn('P = ',P)
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика