8 lines
251 B
Text
8 lines
251 B
Text
100 LET A=10:LET B=12
|
|
110 PRINT A;"and";B;"=";A AND B
|
|
120 PRINT A;"band";B;"=";A BAND B
|
|
130 PRINT A;"or ";B;"=";A OR B
|
|
140 PRINT A;"bor";B;"=";A BOR B
|
|
150 PRINT A;"xor";B;"=";XOR(A,B)
|
|
160 PRINT " not";A;"=";NOT A
|
|
170 DEF XOR(A,B)=(A BOR B)-(A BAND B)
|