В Паскале . Дано натуральное число n. Вычислить : S=1/3^2+1/5^2+1/7^2+......+1/(2n+1)^2

Question

В Паскале . Дано натуральное число n. Вычислить :
S=1/3^2+1/5^2+1/7^2+......+1/(2n+1)^2

Answer 1

//Pascal ABC.NET v3.1 сборка 1172

Var
 s:real;
 n,i:integer;
begin
 readln(n);
 for i:=1 to n do
 s:=1/sqr(2*i+1);
 writeln(s);
end.

Пример ввода:
1
Пример вывода:
0.111111111111111