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

CLSINPUT a, b, c, dIF a = 0 AND b * c * d <> 0 OR b = 0 AND a * c * d <> 0 OR c = 0 AND a * b * d <> 0 OR d = 0 AND a * b * c <> 0 THEN   PRINT "Pravda"ELSE   PRINT "Nepravda"END IFТестовое решение:? 4, -7.2, 0, -6Pravda