ProjectEular

-- Problem 5

module Main (main) where

main :: IO ()
main = print $ problem5

problem5 :: (Integral a) => a
problem5 = foldl1 lcm [2..20]

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