RosettaCodeData/Task/Fibonacci-sequence/L++/fibonacci-sequence.lpp
2016-12-05 23:44:36 +01:00

2 lines
100 B
Text

(defn int fib (int n) (return (? (< n 2) n (+ (fib (- n 1)) (fib (- n 2))))))
(main (prn (fib 30)))