Вычислить выражение

ExteZ

Добрый день! Прошу помощи. Необходимо решить пример. Заранее спасибо!
1 ответ

ExteZ

2)
Var
  i,j: Integer;
  s: Real;
BEGIN
For i:=1 to 100 do
For j:=1 to 50 do
s:=s+1/(i+j*j);
Writeln('Результат: ',s:0:2);
Readln
END.