小编Phi*_*hil的帖子

我已经制作了一个基本程序,输出Fibonacci序列的长度为"n".这是我的代码:

(define (fibh n)
  (if (< n 2)
      n
      (+ (fibh (- n 1)) (fibh (- n 2)))))

(define (fib n)
  (do ((i 1 (+ i 1)))
      ((> i n))
    (display (fibh i))))

例如,它将输出112358.

我想要的是一个列表,如(1 1 2 3 5 8).

任何解释如何做到这一点将不胜感激.