(define (fib n)
(define (fibaux v l c) (if (= c n) v (fibaux (+ v l) v (+ c 1))))
(fibaux 0 1 0))
(write (fib (read)))
KGRlZmluZSAoZmliIG4pCiAgKGRlZmluZSAoZmliYXV4IHYgbCBjKSAoaWYgKD0gYyBuKSB2IChmaWJhdXggKCsgdiBsKSB2ICgrIGMgMSkpKSkKICAoZmliYXV4IDAgMSAwKSkKCih3cml0ZSAoZmliIChyZWFkKSkpCg==