A-M baby
This commit is contained in:
parent
764da6cbbb
commit
db842d013d
19005 changed files with 197040 additions and 7 deletions
9
Task/Logical-operations/PicoLisp/logical-operations.l
Normal file
9
Task/Logical-operations/PicoLisp/logical-operations.l
Normal file
|
|
@ -0,0 +1,9 @@
|
|||
(de logic (A B)
|
||||
(prin "A AND B is ")
|
||||
(println (and A B))
|
||||
(prin "A OR B is ")
|
||||
(println (or A B))
|
||||
(prin "A XOR B is ")
|
||||
(println (xor A B))
|
||||
(prin "NOT A is ")
|
||||
(println (not A)) )
|
||||
Loading…
Add table
Add a link
Reference in a new issue