program christmas_eve_eve_eve
  implicit none
  integer :: d
  read(*,*) d
  d = 25 - d
  write(*,'(a)',advance='no') 'Christmas'
  do while (d .gt. 0)
     write(*,'(a)',advance='no') ' Eve'
     d = d - 1
  end do
  write(*,'(a)') ''
  stop
end program christmas_eve_eve_eve