Пожалуйста решите задачу в паскале через цикл По данному числу n вычислите сумму 1+1/2^2+1/3^2+...+1/n^2.
Пожалуйста решите задачу в паскале через цикл
По данному числу n вычислите сумму 1+1/2^2+1/3^2+...+1/n^2.
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы