program atcoder
    implicit none
    integer(8) :: n,k,i,j
    character(len=7) :: a,b
    character(len=100) :: s
    a = "keyence"
    read*,s
    n = len_trim(s)
    do i = 0,7
        j = 7 - i
        if(i/=0)then
            b(1:i) = s(1:i)
        endif
        if(j/=0)then
            b(7-j+1:7) = s(n-j+1:n)
        endif
        if(b==a)then
            print"(a)","YES"
            stop
        endif
    enddo
    print"(a)","NO"
    stop 
contains


end program atcoder