Найти сумму членов ряда S=1/2!+1/3!+1/4!+… +1/(n+1)! ; n=10 — QBasic(Бейсик)

disel
1
2
3
4
5
6
f = 1
FOR i = 1 TO 10
    f = f * (i + 1)
    s = s + 1 / f
NEXT
PRINT s

Тестирование выполнено в программе QB64 ( Скачать )

Похожие записи/страницы:

Leave a Comment