Ответы

Var
y : real;
begin
for var i:=1 to 25 do
y:= y + (i+2)/(i*(3*i+1));
writeln(y);
end.
Нет комментариев
Var
y : real;
begin
for var i:=1 to 25 do
y:= y + (i+2)/(i*(3*i+1));
writeln(y);
end.