Сумма числового ряда

[NamYola]

Сумма числового ряда

здраствуйте)

Дано: вычислить 1+1/3+32+1/32+...+320

Видно что ряд вычисляется с помощью простейшей формулы (31n+1)+(1/(29n+3)).Но последний элемент последовательности не вписывается в такую зависимость.Как быть тогда?не пойму.

Записал програмку для этой формулы,но суммирование не правильно выводит.
Program Sum;
var
S,y,z:real;
n,i:integer;
begin
write('Vvedite n=');
readln;
S:=1.333;
y:=1.333;
For i:=1 to n do
begin
y:=(31*n+1)+(1/(29*n+3));
S:=S+y;
end;
writeln(' [ S= ', S:5:3,' ]');
readln;
End.

 

[Vladimir_S]

Ну... одна ошибка сразу бьет по глазам. У Вас:
For i:=1 to n do
begin
y:=(31*n+1)+(1/(29*n+3));
S:=S+y;
end;
А надо:
For i:=1 to n do
begin
y:=(31*i+1)+(1/(29*i+3));
S:=S+y;
end;

 

[NamYola]

а блинн,опять старые ошибки делаю.

А с "320" что делать?просто взять и суммировать.Оно же не является членом последовательности??

 

[Vladimir_S]

а блинн,опять старые ошибки делаю.

А с "320" что делать?просто взять и суммировать.Оно же не является членом последовательности??

Думаю, там просто опечатка в условии.

 

[NamYola]

кажись не отпечатка/а ну и ладно с ним что нить придумаем)