По заданной формуле k/(2^k+3) члена с номером k составить программу вычисления суммы всех членов ряда, не меньше заданного числа e — QBasic(Бейсик)

INPUT "Vvedite e:", Eps
DO
k = k + 1
Ch = k / (2 ^ k + 3)
S = S + Ch
LOOP UNTIL Ch < Eps
PRINT "Summa:"; S