Имеется четыре произвольных числа: A,B,C,D. При вводе их в ЭВМ, она должна ответить на вопрос: Правда ли что …? (вопрос в таблице вариантов). Ответ ЭВМ должна вывести в виде текста — слов «Правда» или «Неправда» — QBasic(Бейсик)

disel 
INPUT "vvedite a"; a
INPUT "vvedite b"; b
INPUT "vvedite c"; c
INPUT "vvedite d"; d
IF (a MOD 2 = 0) OR (b MOD 2 = 0) OR (c MOD 2 = 0) OR (d MOD 2 = 0) THEN PRINT "pravda" ELSE PRINT "nepravda"

Тестирование выполнено в программе QB64 ( Скачать )

Похожие записи/страницы:

Leave a Comment