Написать программу Pascal с использованием циклов


Написать программу Pascal с использованием циклов

счастье101 счастье101    3   28.09.2020 23:27    30

Ответы
Шаурма1111111 Шаурма1111111  29.09.2020 01:01

Var

I, m: integer;

Mul:float;

Begin

Read(b);

Mul=1;

M=-1;

For i := 1 to 8 do

Begin

Mul:=mul*(b+(i+1)*(i+1)*m)/i;

M:=m*(-1);

End;

Writeln(mul);

End.

Объяснение:

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