main = do
  y <- readLn
  print $ 2017 - y