godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
em
1985-01-24 11:27:36 +00:00
parent 7657fb8d45
commit a1c27b46db
51 changed files with 863 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
lang/basic/test/test29.b Normal file
View File

@@ -0,0 +1,14 @@
5 print not 1, not 0
10 print 1 and 1, 1 and 0, 0 and 1, 0 and 0
13 print 1 or 1, 1 or 0, 0 or 1, 0 or 0
15 print 1 xor 1, 1 xor 0, 0 xor 1, 0 xor 0
20 print 1 eqv 1, 1 eqv 0, 0 eqv 1, 0 eqv 0
30 print 1 imp 1, 1 imp 0, 0 imp 1, 0 imp 0
40 print 63 and 16, "=16?"
50 print 15 and 14, "=14?"
60 print -1 and 8, "=8?"
70 print 4 or 2, "=6?"
80 print 10 or 10 , "is 10?"
90 print -1 or -2 "=-1?"
100 print not 13
110 print -(13+1)