Памагите информатика пожалуста Запиши программу на языке Паскаль.

Вычисли сумму s=∑k=1nk+1k2+1, если значение n вводит пользователь.

Если n=8, то вывод на экран (Ответ округли до сотых)

Предыдущий
вопрос Следующий
вопрос

program SumCalculation;

var
n, i: integer;
s, result: real;

begin
writeln('Введите значение n:');
readln(n);

s := 0;

for i := 1 to n do
s := s + (i + 1) / (i * i + 1);

result := s;

writeln('Сумма: ', round(result * 100) / 100:0:2);
end.