文責: | @naoiwata |
---|
; 10
(+ 5 3 4)
; 12
(- 9 1)
; 8
(/ 6 2)
; 3
(+ (* 2 4) (- 4 6))
; 6
(define a 3)
; 3
(define b (+ a 1))
; 4
(= a b)
; #f
(if (and (> b a) (< b (* a b)))
b
a)
; 4
(cond ((= a 4) 6)
((= b 4) (+ 6 7 a))
(else 25))
(+ 6 7 3)
; 16
(+ 2 (if (> b a) b a))
(+ 2 b)
(+ 2 4)
; 6
(* (cond ((> a b) a)
((< a b) b)
(else -1))
(+ a 1))
(* b (+ a 1))
(* 4 (+ 3 1))
(* 4 4)
; 16