1 2 3 4import Data.Char main = print $ sum $ map digitToInt $ show $ 2^1000
1 2 3 4
import Data.Char main = print $ sum $ map digitToInt $ show $ 2^1000