Составить программу вычисления суммы бесконечного ряда с заданной точностью

@sibex11 · Регистрация: 20.11.2016

Студворк — интернет-сервис помощи студентам

Составить программу вычисления суммы бесконечного ряда с точность EPS.
Значение EPS вводится с клавиатуры.

$https://www.cyberforum.ru/cgi-bin/latex.cgi?<br /> \sum_{n=1}^{\infty}\frac{(-1)^{n-1}}{n^3+1}<br />$

@~~MansMI~~ · 28.02.2017, 06:39

Pascal

var el,eps,sum:real;
    n:integer;
begin
write('eps=');
readln(eps);
sum:=0;
n:=1;
repeat
if n mod 2 = 1 then el:=1
else el:=-1;
el:=el/(n*n*n+1);
sum:=sum+el;
n:=n+1;
until abs(el)<eps;
writeln('sum=',sum);
readln;
end.

@sibex11 10 / 10 / 0 Регистрация: 20.11.2016 Сообщений: 81
		1
	Составить программу вычисления суммы бесконечного ряда с заданной точностью 27.02.2017, 21:02. Показов 2121. Ответов 1 Метки нет (Все метки) Составить программу вычисления суммы бесконечного ряда с точность EPS. Значение EPS вводится с клавиатуры. $https://www.cyberforum.ru/cgi-bin/latex.cgi?<br /> \sum_{n=1}^{\infty}\frac{(-1)^{n-1}}{n^3+1}<br />$ 0

	28.02.2017, 06:39

Опции темы

Составить программу вычисления суммы бесконечного ряда с заданной точностью

Решение