main :: IO ()
main = print . (\x -> if x == 0 then 1 else 0) . read =<< getLine