Pascal Вывести на экран последовательность чисел и вычислить сумму ряда: 1/2,

Pascal
Вывести на экран последовательность чисел и вычислить сумму ряда: 1/2, , 1/6, 1/8, 1/10,

Задать свой вопрос
1 ответ
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программка не работает, обновите версию!

begin
  SeqGen(ReadInteger('n='),i-gt;1/(2*i),1).Println.Sum.Println
end.

Пример
n= 6
0.5 0.25 0.166666666666667 0.125 0.1 0.0833333333333333
1.225
Ева Лолейт
https://znanija.com/task/29174940
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт