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

моя вина,сразу не заметил что имя это уже есть.

спасибо большое

и еще,насчет условия то что первое число должно быть нечетным.оно присутствует в данном решении?

Во втором вложении видите - с нечетного начат ввод. но на деле этому алгоритму все равно)))

окей)спасиб

О четности или нечетности вещественного числа можно говорить лишь если оно не имеет дробной части. В этом случае оно приводится к целому числу. Я не знаю, зачем дано абсолютно глупое требование не использовать условный оператор, но выполнить его можно. Надо умножать число на абсолютную величину остатка от его деления на 2. Если число четное, остаток будет нулевым, нечетное - единичным. Поэтому результатом умножения будет или само нечетное число, или ноль. И можно все подряд складывать.CLSDIM n AS INTEGERINPUT "n=", nDIM i AS INTEGER, k AS INTEGER, x AS SINGLE, s AS SINGLE, i AS INTEGERs = 0FOR i = 1 TO n   INPUT "->", x   s = s + x * (ABS(INT(x)) MOD 2)NEXT iPRINT "s = ", s