Дана сумма ряда. Ряд Маклорена в Паскале

vitjok · 08.11.2012, 13:11

Помогите пожалусйта вообще не понимаю как тут посчитать, через n-й член:

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

Vladimir_S · 08.11.2012, 14:27

Цитата:

Сообщение от vitjok

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

И я не могу. И я не понимаю, как он образовался. Да, плохи Ваши дела - боюсь, смысл этого ряда навсегда останется тайной того идиота, который его изобрёл. Или его секретарши, которая это дело набивала. Сочувствую...

vitjok · 08.11.2012, 14:30

эт он сам придумал))такие уж у нас программеры а армии)) он протсто старый уже))
а если вместо 7! поставить 5!)то в знаменателе получится формула(n+1)!+(n+2)! ??)
извиняюсь но в 3-ем члене, 4!+7!)) если это чем то поможе

Vladimir_S · 08.11.2012, 15:15

Единственное, что могу посоветовать - это считать, что там действительно каждый i-тый член суммы есть i/((i+1)!+(i+2)!), и воспользоваться программой отсюда, адаптировав к нужной формуле. Успехов!

vitjok · 09.11.2012, 16:51

у меня к вам большой вопрос как записать факториал в паскале???))

Vladimir_S · 09.11.2012, 17:04

Цитата:

Сообщение от vitjok

у меня к вам большой вопрос как записать факториал в паскале???))

По разному можно. Например, задав функцию:

Код:

Function Nfact(n:Word):Extended;
VAR
  i:Word;
  fact:Extended;
Begin
  If n=0 then fact:=1 else
    begin
      fact:=1;
      for i:=1 to n do
        fact:=fact*i;
    end;
  Nfact:=fact;
End;

А вообще можно вполне обойтись и без факториала, задавая члены ряда рекуррентно. Это если сообразить, что

(i+1)! + (i+2)! = (i+1)!*(i+3)

Таким образом, для получения i-го члена ряда из (i-1)-го нужно этот (i-1)-й поделить на (i+1), поделить на (i-1), умножить на i, умножить на (i+2) и поделить на (i+3).

vitjok · 09.11.2012, 21:25

что то я не доконца все понимаю( вот лучше бы с фукцией разобраться)для моей формулы i/((I+1)!+(I+2)!)

Vladimir_S · 10.11.2012, 09:45

Цитата:

Сообщение от vitjok

что то я не доконца все понимаю( вот лучше бы с фукцией разобраться)для моей формулы i/((I+1)!+(I+2)!)

Конечно. Так а я про что?
Ладно, вот Вам два варианта решения - с явным заданием факториала и без такового. Запустите обе программы и убедитесь, что они выдают ровно одно и то же.

С факториалом:

Код:

Var
 i,n:Byte;
 S:real;

Function Nfact(n:Word):Extended;
VAR
  i:Word;
  fact:Extended;
Begin
  If n=0 then fact:=1 else
    begin
      fact:=1;
      for i:=1 to n do
        fact:=fact*i;
    end;
  Nfact:=fact;
End;

Begin
 Write('n= ');
 Readln(n);
 S:=0;
 For i:=1 to n do
  S:=S+i/(Nfact(i+1)+Nfact(i+2));
 Writeln('S= ',S:0:8);
 Readln
End.

Без факториала (в явном виде):

Код:

Var
 i,n:Byte;
 a,S:real;

Begin
 Write('n= ');
 Readln(n);
 a:=1/8;
 S:=a;
 For i:=2 to n do
  begin
   a:=a/(i-1)*i/(i+1)*(i+2)/(i+3);
   S:=S+a;
  end;
 Writeln('S= ',S:0:8);
 Readln
End.

Попробуйте разобраться.

vitjok · 13.11.2012, 17:45

спасибо разобрался)) нам седня через функции подробно описали)) и он в сумме ошибку исправил)) 2-й член ее правильный был))
как бы было хорошо если бы вы у нас вели информатику))

08.11.2012, 13:11	#1 (permalink)
vitjok Member Регистрация: 29.09.2012 Сообщений: 72 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Дана сумма ряда. Ряд Маклорена в Паскале Помогите пожалусйта вообще не понимаю как тут посчитать, через n-й член: я не могу придумать формулу(( не понимаю как образовался тречий член суммы((

08.11.2012, 14:30	#3 (permalink)
vitjok Member Регистрация: 29.09.2012 Сообщений: 72 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	эт он сам придумал))такие уж у нас программеры а армии)) он протсто старый уже)) а если вместо 7! поставить 5!)то в знаменателе получится формула(n+1)!+(n+2)! ??) извиняюсь но в 3-ем члене, 4!+7!)) если это чем то поможе Последний раз редактировалось vitjok; 08.11.2012 в 14:36

08.11.2012, 15:15	#4 (permalink)
Vladimir_S Специалист Регистрация: 27.08.2008 Адрес: Санкт-Петербург Сообщений: 27,807 Сказал(а) спасибо: 340 Поблагодарили 583 раз(а) в 208 сообщениях Репутация: 113184	Единственное, что могу посоветовать - это считать, что там действительно каждый i-тый член суммы есть i/((i+1)!+(i+2)!), и воспользоваться программой отсюда, адаптировав к нужной формуле. Успехов!

09.11.2012, 16:51	#5 (permalink)
vitjok Member Регистрация: 29.09.2012 Сообщений: 72 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	у меня к вам большой вопрос как записать факториал в паскале???))

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070

09.11.2012, 21:25	#7 (permalink)
vitjok Member Регистрация: 29.09.2012 Сообщений: 72 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	что то я не доконца все понимаю( вот лучше бы с фукцией разобраться)для моей формулы i/((I+1)!+(I+2)!)

13.11.2012, 17:45	#9 (permalink)
vitjok Member Регистрация: 29.09.2012 Сообщений: 72 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	спасибо разобрался)) нам седня через функции подробно описали)) и он в сумме ошибку исправил)) 2-й член ее правильный был)) как бы было хорошо если бы вы у нас вели информатику))