main :: IO ()
main = print . abs . subtract 10 . length =<< getLine