(define (fib n)
(cond ((= n 0) 0)
((= n 1) 1)
(else (+ (fib (- n 1))
(fib (- n 2))))))
;izpolzvane
(fib 6)
;otgovor 8
Публикацията е добавена на 18.11.2012, 17:19 в Lisp Код, Код. Можете да проследите отговорите на RSS 2.0.
Можете да оставите коментар, или да проследите от вашия сайт.