program main
implicit none
character(100) ::S
integer :: count = 0
integer :: n

read *,S
n = len_trim(S)

if(S(1:1)=="k")count = count + 1
if(S(1:2)=="ke")count = count + 1
if(S(1:3)=="key")count = count + 1
if(S(1:4)=="keye")count = count + 1
if(S(1:5)=="keyen")count = count + 1
if(S(1:6)=="keyenc")count = count + 1
if(S(1:7)=="keyence")count = count + 1

if(S(n-0:n)=="e")count = count + 1
if(S(n-1:n)=="ce")count = count + 1
if(S(n-2:n)=="nce")count = count + 1
if(S(n-3:n)=="ence")count = count + 1
if(S(n-4:n)=="yence")count = count + 1
if(S(n-5:n)=="eyence")count = count + 1
if(S(n-6:n)=="keyence")count = count + 1

if ( count >= 7 ) then
print *,"yes"
else
print *,"no"
end if
end program main