RosettaCodeData/Task/Logical-operations/Commodore-BASIC/logical-operations-1.basic

10 A = -1
20 B = 0
30 PRINT A AND B
40 PRINT A OR B
50 PRINT (A AND (NOT B)) OR ((NOT A) AND B)
60 PRINT NOT A