5 lines
124 B
Common Lisp
5 lines
124 B
Common Lisp
|
|
(defun fibonacci-recursive (n)
|
||
|
|
(if (< n 2)
|
||
|
|
n
|
||
|
|
(+ (fibonacci-recursive (- n 2)) (fibonacci-recursive (- n 1)))))
|