main :: IO()
main = do
  x <- getLine
  putStrLn . solve . read $ x


solve :: Int -> String
solve 25 = "Christmas"
solve 24 = "Christmas Eve"
solve 23 = "Christmas Eve Eve"
solve 22 = "Christmas Eve Eve Eve"
solve _ = error "error"