мета-данные страницы
  •  
Загрузка не удалась. Возможно, проблемы с правами доступа?

Это старая версия документа!


Числа Фиббоначи

Рассмотрим лобовое решение с бинарной рекурсией:

fib :: Int -> Int
fib 1 = 1
fib 2 = 1
fib n = fib (n-1) + fib (n-2)

тогда сам список чисел Фиббоначи может быть задан следующим образом:

fibset = [ fib n | n <- [1..] ]