Пожалуйста решите задачу в паскале через цикл
По данному числу n вычислите сумму 1+1/2^2+1/3^2+...+1/n^2.
Ответы
Ответ дал:
0
Program dfsdf;var n,i: integer; s,a: real;begin Readln(n); s:= 0; for i:= 2 to n do a:= 1 + ((1 / n) * (1 / n)); s:= s + a; Writeln(s)end.
Похожие вопросы
2 года назад
7 лет назад
7 лет назад
9 лет назад
10 лет назад