6 lines
220 B
Text
6 lines
220 B
Text
10 INPUT "A="; A
|
|
20 INPUT "B="; B
|
|
30 PRINT "A AND B =" A AND B :rem AND
|
|
40 PRINT "A OR B =" A OR B :rem OR
|
|
50 PRINT "A XOR B =" (A AND(NOT B))OR((NOT A)AND B) :rem XOR
|
|
60 PRINT "NOT A =" NOT A :rem NOT
|