вычисление конечных сумм в Паскале.

[lammy]

прошу совета опытных программистов. Нужно вычислить сумму заданного ряда, с N количеством слагаемых. Каждое слагаемое состоит из дроби, в которой значение числителя показывает количество слагаемых в знаменателе.. вот такой вот фокус((

[p51x]

Напишите общий член ряда и запихните все дело в цикл.

[RUSt88]

не понятно по какому алгоритму образуется эта последовательность в знаменателе
2
4 + 6
6 + 9 + 12
8 + 12 + 16 + 20

а так все правильно отвечено постом выше, это дело циклопа )

[p51x]

Попробуйте: числитель*2 + числитель*3 + ... + числитель*(числитель-1)

[lammy]

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

не понятно по какому алгоритму образуется эта последовательность в знаменателе
2
4 + 6
6 + 9 + 12
8 + 12 + 16 + 20

а так все правильно отвечено постом выше, это дело циклопа )

ну как я понял, первое слагаемое в знаменателе - это 2*числитель, а последующие слагаемые увеличиваются на показатель числителя..
то что сумма вычисляется через цикл - это понятно, но у меня проблема, не могу составить этот цикл..((

[Stilet]

Тьфу ты...
Че тут думать то?

     var s:double;l,e,k,i:integer;
begin             l:=-1;
 for i:=2 to 4 do begin
  k:=0;
  for e:=2 to (i+1) do
   k:=k+e*i;
  s:=s+l*i/k;
  l:=l*-1;
 end;
 s:=1/2+s;
 Write(s:10:5);
 Readln;
  { TODO -oUser -cConsole Main : Insert code here }
end.

Закономерность как грится на лице.

[lammy]

Stilet, спасибо вам большое! я нуб начинающий, падаю на таких задачках(

[Anatole]

Stilet
Только, в соответствии с условием, первый цикл нужно записать так:

for i:=2 to N do begin

где N вводится по запросу.

[Stilet]

Та ради бога
Автору не мешает поднапрячся методичками.