这是使用来自臭名昭著的 SICP 的 MIT 方案。我只是无法理解正在发生的事情。这是计算的过程N!
。
(define (factorial n)
(if (= n 0)
1
(* n (factorial (- n 1)))))
这是计算斐波那契的过程
(define (fib n)
(cond ((= n 0) 0)
((= n 1) 1)
(else (+ (fib (- n 1))
(fib (- n 2))))))