最初のページ
戻る
次へ
最後のページ
画像
(cond ...)でも書ける
(define (fact n )
(cond ((equal? n 0) 1)
(else (* n (fact (- n 1))))))
(fact 10)
(define (fact n )
(cond ((zero? n) 1)
(else (* n (fact (- n 1))))))
(fact 10)