Problem13
以下の50桁の数字100個の総和の上位10桁を求めよ。(略)
http://odz.sakura.ne.jp/projecteuler/index.php?Problem%2013
Haskell
数字は"p13num"に書いてあるとする。
IOモナドを使って
main=readFile "p13num" >>= print . take 10 . show . sum . map (\x->read(x)::Integer) . lines
answer
"5537376230"