main :: IO ()
main = print . flip (-) 1 =<< readLn