ProjectEular

-- Problem 25

module Main (main) where

import qualified Common as C (fibs)

main :: IO ()
main = print $ problem25

problem25 :: (Integral a) => a
problem25 = fst $ head $ filter (\x -> snd x >= 10^999) $ zip [2..] C.fibs

トップ   差分 バックアップ リロード   一覧 単語検索 最終更新   ヘルプ   最終更新のRSS