习题1.11

(defn f[n]
  (if (< n 3) n
    (+
      (f (- n 1))
      (* 2 (f (- n 2)))
      (* 3 (f (- n 3)))
    )
  )
)
(defn f-iter[n i f2 f1 f0 ]
      (if (< i n)
          (f-iter n (+ i 1) (+ f2 (* 2 f1) (* 3 f0)) f2 f1)
          f0
      )
)
(defn f [n]
  (if (< n 3)
    n
    (f-iter n 0 2 1 0)
  )
)

两个执行的结果是一样的，前一个是递归计算过程的方法，第二个是迭代计算过程的方法。

第二个版本写的不太好，理论应该返回f2 ,才是合理的过程。这个就不调整了，差别不是很大。

两个方法的计算结果也是完全一样的。平时写java 习惯了用for来写，也没有写过这种复杂逻辑。