PasteRack.org
Paste # 72670
2023-01-23 13:14:57

Fork as a new paste.

Paste viewed 95 times.


Embed:

  1. #lang racket
  2.  
  3. (define (fib n)
  4.   (let loop ([n n] [a 0] [b 1])
  5.     (if (< a 1)
  6.         a
  7.         (loop (sub1 n) b (+ a b)))))
  8.  
  9. (fib 24)

=>

0