(defn input []
  (Integer/parseInt (read-line)))

(defn Christmas [D]
  (case D
    25 "Christmas"
    24 "Christmas Eve"
    23 "Christmas Eve Eve"
    22 "Christmas Eve Eve Eve"
    "Error"))

(->> (input)
  Christmas
  println)