2018-12-16から1日間の記事一覧

HaskellでProject Euler #51

List comprehensioが便利だった.ideoneで<0.3secぐらい. import Data.List -- PE #51 main :: IO () main = do let n = 8 -- Suffice to check (11 - n) digits for n primes families let chars = take (11 - n) "0123456789" let primes = 2 : filter is…