Оператор if...then - QBasic

Формулировка задачи:

Как это записать покомактней?
' ...
IF (a < 0 AND b < 0 AND c = 0) OR (a < 0 AND b = 0 AND c < 0) OR (a = 0 AND b < 0 AND c < 0) THEN
PRINT TAB(10);
PRINT "Zadannye chisla nepolojitelnye"
END IF
IF (a = 0 AND b = 0 AND c < 0) OR (a = 0 AND b < 0 AND c = 0) OR (a < 0 AND b = 0 AND c = 0) THEN
PRINT TAB(10);
PRINT "Zadannye chisla nepolojitelnye"
END IF
' ...

Код к задаче: «Оператор if...then - QBasic»

textual
IF a <= 0 AND b <= 0 AND c <= 0 AND a + b + c < 0 THEN ...

8   голосов, оценка 3.750 из 5


СОХРАНИТЬ ССЫЛКУ