Сколько раз необходимо вычесть число 2 из числа b , чтобы оно стало меньше меньше 0 Программа QBasic

Я считаю,что четыре раза!

CLS A = 0 INPUT"Введите B:",B DO B = B - 2 a = a + 1 LOOP WHILE (B >= 0) PRINT "2 надо вычесть",a,"раз" END