ПАСКАЛЬ.по данному числу n вычислите сумму 1+1/2^2+1/3^2+...+1/n^2
ПАСКАЛЬ.
по данному числу n вычислите сумму 1+1/2^2+1/3^2+...+1/n^2
Гость
Ответ(ы) на вопрос:
Гостьvar n, i: integer;
s: real;
begin
writeln('Введи n');
readln(n);
s := 1;
for i := 1 to n do
s := s + (1 / sqr(n));
writeln(s);
end.
Не нашли ответ?
Похожие вопросы