4 lines
78 B
Text
4 lines
78 B
Text
main : IO()
|
|
main = do
|
|
line <- getLine
|
|
print $ sum $ map cast $ words line
|