Числа Фибоначчи в Lisp

Пример для версий Clojure 1.0.0, Clojure 1.1.0

Используется рекурсивное вычисление чисел Фибоначчи.

(defn fibonacci [x]
  (if (< x 2)
    x
    (+ (fibonacci (- x 1)) (fibonacci (- x 2)) )))

(doseq [i (range 1 17)]
  (print (str (fibonacci i) ", ")))
(println "...")

Числа Фибоначчи в Lisp

Комментарии