The fibonacci sequence can be coded as:
(defun fib (n) (if (< n 2) 1 (+ (fib (- n 1)) (fib (- n 2)))))
Then (fib 10) should be 89. However: in your program it is 10.
Maybe double recursion is not provided? Single recurion is okay:
(defun fact (n) (if (< n 2) n (* n (fact (- n 1)))))
Then (fact 5) is 120.
The fibonacci sequence can be coded as:
(defun fib (n) (if (< n 2) 1 (+ (fib (- n 1)) (fib (- n 2)))))Then (fib 10) should be 89. However: in your program it is 10.
Maybe double recursion is not provided? Single recurion is okay:
(defun fact (n) (if (< n 2) n (* n (fact (- n 1)))))Then (fact 5) is 120.