Составить программу вычисления произведения 10 элементо ряда P=1×3×5… (2×i-1)

Вопрос школьника по предмету Информатика

Составить программу вычисления произведения 10 элементо ряда P=1×3×5… (2×i-1)

Ответ учителя по предмету Информатика

Var

A:integer;

P:real;

Begin

P:=1;

For A:= 1 to 10 do

    P:=P*(2*A-1);

WriteLn(‘P = ‘,P)

End.

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *

Похожие вопросы от пользователей