Написать программу на авс.net паскале которая высчитывает произведение первых n-чисел ряда p=2/3*2/5*2/7*..*2/2i+1

alina13lina87 alina13lina87    3   23.05.2019 17:50    0

Ответы
DANA3072005 DANA3072005  19.06.2020 13:23

Var i,n:integer;

P:=real;

Begin

Read(n);

P:=1.0;

For i:=1 to n do

Begin

P:=p*2/(i+1);

End;

Write (p);

End.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика