main = do
  x <- getLine
  putStrLn $ (\x -> if x == "1" then "0" else "1") x