import System main = do x <- getArgs print (sum (map rDouble x)) rDouble :: String -> Double rDouble = read