12 lines
301 B
Plaintext
12 lines
301 B
Plaintext
var a, b = integer
|
|
a = 10
|
|
b = 2
|
|
print "a ="; a; tab(16); hex$(a)
|
|
print "b ="; b; tab(16); hex$(b)
|
|
print "a and b ="; a and b; tab(16); hex$(a and b)
|
|
print "a or b ="; a or b; tab(16); hex$(a or b)
|
|
print "a xor b ="; a xor b; tab(16); hex$(a xor b)
|
|
print "not a ="; not a; tab(16); hex$(not a)
|
|
|
|
end
|