Вычислить частичную сумму ряда S=1/2^2+1/3^2+1/4^2+…. Вычисление прекратить, когда модуль…

Question

44

Вычислить частичную сумму ряда S=1/2^2+1/3^2+1/4^2+…. Вычисление прекратить, когда модуль очередного слагаемого станет меньше 0,001. Проверьте, насколько сумма приблизилась к значению pi^2/6.

в избранное ссылка

Знаете ответ?

trigande123 · Accepted Answer

49

trigande123

11 февраля 2023

vars,x,i: real; beginx: =1; i: =2; while x>0,001 do begins: =s+x; x: =sqr (1/i); i: =i+1; end; writeln ('s=', s, ' pi^2/6=', sqr (pi) /6); end.

комментировать

в избранное ссылка отблагодарить