Дана последовательность из N вещественных чисел. Первое число в последовательности нечетное. Найти сумму всех идущих подряд в начале последовательности нечетных чисел. Условный оператор не использовать.Qbasic

Предыдущий
вопрос Следующий
вопрос

DIM n, i, sum, number AS INTEGER
sum = 0
i = 1

INPUT "Enter the number of elements in the sequence: ", n

WHILE i <= n
INPUT "Enter a number: ", number
IF number MOD 2 <> 0 THEN
sum = sum + number
ELSE
EXIT WHILE
END IF
i = i + 1
WEND

PRINT "The sum of the consecutive odd numbers in the sequence is: "; sum