ProjectEular

-- Problem 10

module Main (main) where

import qualified Common as C (is_prime)

main :: IO ()
main = print $ problem10

problem10 :: (Integral a) => a
problem10 = sum [ x | x <- (2:[3,5..2000000]), C.is_prime x ]
トップ   差分 バックアップ リロード   一覧 単語検索 最終更新   ヘルプ   最終更新のRSS