import Data.Fixed data E10 = E10 instance HasResolution E10 where resolution _ = 10 ^ 10 type E10' = Fixed E10 main = do getLine getContents >>= print . sum . map (read::String->E10') . lines