Вопрос пользователя:
Вычислить значение переменной у, при n: у=1/1^2+1/2^2+1/3^2+…+1/n^2.
Написать решение на языке паскаль.
Илюха отвечает:
program znachy2;
uses crt;
var n,l:integer;
k,y:real;
begin
y:=0;
readln(l);
for n:=1 to l do
begin
k:=1/sqr(n);
y:=k+y;
end;
writeln(y)
end.