Сумма ряда

[vironn]

Приветствую всех.

Есть некий числовой ряд http://i031.radikal.ru/1105/37/fa90ac521b75.jpg
Чтобы было понятней, преобразуем его

а1+k1=а2;
а2+k2=а3;
а3+k3=а4;
а4+k4=а5;
а5+k5=а6;
...................

Подскажите пожалуйста как организовать такое суммирование.
С вычислением k(n) проблем нет.

[java_91]

For i:=1 to n do
if i<n then
a[i+1]:=a[i]+k[i]
else
Otvet:=:=a[i]+k[i];

Ты это имел ввиду?

[BingoBongo]

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

For i:=1 to n do
if i<n then
a[i+1]:=a[i]+k[i]
else
Otvet:=:=a[i]+k[i];

Ты это имел ввиду?

почему то мне кажется что в цикле не хватает begin end. иначе будет не единичный прогон, а конечный.