Вычислить значение n-го числа Фибоначчи. Значение n вводится с клавиатуры.

(defun fib (x)

(loop for i below x

and a = 0 then b 

and b=1 then (+ b a)

finally (return a)))

 

Пример:
>(fib 1)
1