import Control.Applicative

main :: IO ()
main = do
    n <- readLn
    putStrLn $ solve n 
    
solve :: Int -> String
solve n | 25 == n = "Christmas"
        | 24 == n = "Christmas Eve"
        | 23 == n = "Christmas Eve Eve"
        | 22 == n = "Christmas Eve Eve Eve"