5 lines
115 B
Haskell
5 lines
115 B
Haskell
main = do
|
|
--print . map read
|
|
file <- readFile "13.txt"
|
|
putStrLn . take 10 $ show . sum $ map read (lines file)
|