RosettaCodeData/Task/Logical-operations/Scheme/logical-operations.scm
2024-10-16 18:07:41 -07:00

10 lines
195 B
Scheme

(define (logic a b)
(display "a and b is ")
(display (and a b))
(newline)
(display "a or b is ")
(display (or a b))
(newline)
(display "not a is ")
(display (not a))
(newline))