aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions
RosettaCodeData/Task/Fibonacci-sequence/Racket/fibonacci-sequence-2.rkt

5 lines
88 B
Racket
Raw Permalink Normal View History

June 2018 Update
2018-06-22 20:57:24 +00:00
(define (fib n (a 0) (b 1))
(if (< n 2)
1
(+ a (fib (- n 1) b (+ a b)))))
Reference in a new issue Copy permalink