Составьте программу (на алгоритмическом языке паскаль) для вычисления суммы ряда s=1/2^2+3/4^2+5/6^2+7/8^2+9/10^2+ с точностью до члена ряда, не превышающего по абсолютной величине 0,001.

6polih1 6polih1    2   17.06.2019 12:50    0

Ответы
I:integer;
b, sum:real;
BEGIN
i:=0;
while (b>=0.001) do
begin
i:=i+1;
b:=i/((i+1)*(i+1));
sum:=sum+b;
end;
writeln(sum);
END.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика