Составить программу для вычисления s=1/2+2/3+3/4…+n/n+1 — QBasic(Бейсик) — Справочник разработчика. Приемная комиссия

INPUT "N=", n
s = 0
FOR i = 1 TO n
    s = s + i / (i + 1)
NEXT
PRINT s

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

Составить программу для вычисления s=1/2+2/3+3/4…+n/n+1 — QBasic(Бейсик)