6 lines
136 B
Haskell
6 lines
136 B
Haskell
fib = 1 : 1 : zipWith (+) fib (tail fib)
|
|
|
|
fibIndexed = zip fib [1..]
|
|
|
|
e025 = filter (\(d, _) -> (length . show $ d) >= 1000) fibIndexed
|