Вычислить двойную сумму

@MyEyesStillCry · Регистрация: 19.06.2010

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

Вычислить сумму $https://www.cyberforum.ru/cgi-bin/latex.cgi?0.3\sum_{i=1}^{20}\sum_{j=1}^{\infty}\frac{\sin \frac{ij}{\pi }}{i^5+j^5}$
Точность вычислений $https://www.cyberforum.ru/cgi-bin/latex.cgi?\varepsilon ={10}^{-3}$

@Puporev · 04.03.2014, 15:46

Pascal

const e=0.001;
var i,j:longint;
    s1,s,t:real;
begin
s:=0;
for i:=1 to 20 do
 begin
  j:=1;
  t:=sin(i*j)/2;
  s1:=t;
  while t>e do
   begin
    j:=j+1;
    t:=sin(i*j)/(i*i*i*i*i+j*j*j*j*j);
    s1:=s1+t
   end;
  s:=s+s1
 end;
write('S=',s:0:4);
end.

@volvo · 04.03.2014, 16:22

Pascal

14	t:=sin(ij / Pi)/(iiiii+jjjj*j);

@Puporev · 04.03.2014, 16:26

Да pi пропустил...

Вычислить двойную сумму

Решение

Решение

@MyEyesStillCry 0 / 0 / 0 Регистрация: 19.06.2010 Сообщений: 17
		1
	Вычислить двойную сумму 04.03.2014, 14:14. Показов 1393. Ответов 3 Метки нет (Все метки) Вычислить сумму $https://www.cyberforum.ru/cgi-bin/latex.cgi?0.3\sum_{i=1}^{20}\sum_{j=1}^{\infty}\frac{\sin \frac{ij}{\pi }}{i^5+j^5}$ Точность вычислений $https://www.cyberforum.ru/cgi-bin/latex.cgi?\varepsilon ={10}^{-3}$ 0

@Puporev Почетный модератор 64304 / 47599 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	04.03.2014, 16:26	4
	Да pi пропустил... 1

Опции темы