toChristmas :: Int -> String
toChristmas 25 = "Christmas"
toChristmas 24 = "Christmas Eve"
toChristmas 23 = "Christmas Eve Eve"
toChristmas 22 = "Christmas Eve Eve Eve"

main :: IO()
main = do
  day <- readLn
  putStrLn $ toChristmas day