Помогите пожалуйста ** pascalabc.net По данному числу n вычислите сумму...

0 голосов
67 просмотров

Помогите пожалуйста на pascalabc.net
По данному числу n вычислите сумму 1+1/22+1/32+...+1/n2.

Входные данные
Вводится одно число n, не превосходящее 100000.

Выходные данные
Необходимо вывести значение суммы.


Информатика (17 баллов) | 67 просмотров
Дан 1 ответ
0 голосов
Правильный ответ
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  (SeqGen(ReadInteger,i->1/(10*(i+1)+2)).Sum+1).Println
end.

Пример
10
1.26596470171236
(150k баллов)