euler/haskell/e013.hs

5 lines
115 B
Haskell
Raw Normal View History

2015-01-04 23:52:50 +01:00
main = do
--print . map read
file <- readFile "13.txt"
putStrLn . take 10 $ show . sum $ map read (lines file)