Составьте программу вычисления произведения 10 элементов ряда P=1*3*5... * (2*i-1) Где i-порядковый номер элемента. (Паскаль)
Составьте программу вычисления произведения 10 элементов ряда P=1*3*5... * (2*i-1)
Где i-порядковый номер элемента. (Паскаль)
Гость
Ответ(ы) на вопрос:
ГостьVar
i:integer;
P:real;
Begin
P:=1;
For i:= 1 to 10 do
P:=P*(2*i-1);
WriteLn('P = ',P)
End.
Не нашли ответ?
Похожие вопросы