import Control.Applicative ((<$>))

main :: IO ()
main = do
  solve <$> getl (map read . words) >>= print

solve :: [Int] -> Int
solve = (55 -) . sum

getl :: (String -> a) -> IO a
getl f = f <$> getLine