Помогите с pascal,qbasic
Вычислить значение логического выражения

Не спорю,но это нужно расписать в qbasic)

a = ((NOT(x * y < 0 )) or (y > x))

(2 * 1  < 2) - это истина(1 > 2) - это ложьне (2 * 1  < 2)  - это ложь Итого получается ложь или ложьЕстественно ложь