main = getLine >>= print . pred . (read :: String -> Int)