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

@sveta 1985 · Регистрация: 05.10.2012

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

составить программу вычисления суммы ряда с точностью
$https://www.cyberforum.ru/cgi-bin/latex.cgi?\varepsilon ={10}^{-4} \sum_{n-1}^{\propto }n!/(2n)!$

@Puporev · 09.10.2012, 09:30

Для Турбо Паскаля

Pascal

uses crt;
const e=0.0001;
var n:integer;
    s,t:real;
begin
n:=0;
t:=1;
s:=t;
while t>e do
 begin
  n:=n+1;
  t:=t*n/(2*n*(2*n-1));
  s:=s+t;
 end;
write('S=',s:0:8);
readln
end.

Проверка в Эксель

n	n!	(2n)!	t	s
1	1	2	0,5	0,5
2	2	24	0,083333333	0,583333333
3	6	720	0,008333333	0,591666667
4	24	40320	0,000595238	0,592261905
5	120	3628800	3,30688E-05	0,592294974

@sveta 1985 0 / 0 / 0 Регистрация: 05.10.2012 Сообщений: 31
		1
	Составить программу вычисления суммы ряда с заданной точностью 09.10.2012, 09:01. Показов 5518. Ответов 1 Метки нет (Все метки) составить программу вычисления суммы ряда с точностью $https://www.cyberforum.ru/cgi-bin/latex.cgi?\varepsilon ={10}^{-4} \sum_{n-1}^{\propto }n!/(2n)!$ 0

Опции темы

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

Решение