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

дима2195 дима2195    1   25.09.2019 23:10    1

Ответы
Kov3456 Kov3456  08.10.2020 19:30
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

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

Пример
n= 6
0.5 0.25 0.166666666666667 0.125 0.1 0.0833333333333333
1.225
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика