Помогите написать программу в Паскале:
Приложения:

Ответы на вопрос
Ответил Аноним
0
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
(1+SeqGen(ReadInteger('n='),i->2*i/(2*i+1),1).Sum).Println
end.
Пример
n= 10
9.8191254222214
Внимание! Если программа не работает, обновите версию!
begin
(1+SeqGen(ReadInteger('n='),i->2*i/(2*i+1),1).Sum).Println
end.
Пример
n= 10
9.8191254222214
Новые вопросы