S=gets;
Sd="keyence"
pointer1=0
for i in 0...S.size do
    if Sd[pointer1]==S[i] then 
        pointer1+=1
        if pointer1==7 then break end
    else break end
end
pointer2=S.size-1
c=0
(S.size-1).downto(0) do |i|
    if Sd[6-c]==S[i] then 
        pointer2-=1
        c+=1
        if pointer2==-1 then break end
    else break end
end 
if pointer1+c>=7 then puts "YES" else puts "NO" end
