fib.scm « sample - ruby.git - The Ruby Programming Language

summary refs log tree commit diff

path: root/sample/fib.scm

blob: 5c2b86e656cd50b846f7f72d479cd7d056a04e00 (plain)

(define (fib n)
  (if (< n 2)
      n
      (+ (fib (- n 2)) (fib (- n 1)))))

(display (fib 20))
(newline)