import Control.Applicative

main = do
  n <- readInt <$> getLine
  let p = if n `mod` 2 == 0 then n else n + 1
  putStrLn $ show p


readInt :: String -> Int
readInt = read