5 'Проверка результатов логических операций NOT,AND,OR,XOR,EQV,IMP для операндов i,j╝{-1,0}.
10 FOR I=-1 TO 0:FOR J=-1 TO 0
20 PRINT I;J;NOT(I);IANDJ;IORJ;IXORJ;IEQVJ;IIMPJ
40 NEXT:NEXT