Дано натуральное число N . Вычислите s=1/3^2+1/5^2...+1/2(2*N+1)^2
Var n,i: integer; s: real; begin write('задайте n: '); readln(n); s:=0; for i:=1 to n do s:=s+1/((2*i+1)*(2*i+1)); writeln('сумма ряда равна: ',s:10:7); end.
Это верное решение?
скопируйте, запустите и проверьте