program sample
	implicit none
    character(100) ::word
    integer :: count,a
    
    read(*,*) word
    
    a=len_trim(word)
    
    if (word(a-6:a) == 'keyence') then
    	write(*,*) 'YES'
    else if (word(1:1) == 'k' .and. word(a-5:a) == 'eyence') then
    	write(*,*) 'YES'
    else if (word(1:2) == 'ke' .and. word(a-4:a) == 'yence') then
    	write(*,*) 'YES'
    else if (word(1:3) == 'key' .and. word(a-3:a) == 'ence') then
    	write(*,*) 'YES'
    else if (word(1:4) == 'keye' .and. word(a-2:a) == 'nce') then
    	write(*,*) 'YES'
    else if (word(1:5) == 'keyen' .and. word(a-1:a) == 'ce') then
    	write(*,*) 'YES'
    else if (word(1:6) == 'keyenc' .and. word(a:a) == 'e') then
    	write(*,*) 'YES'
    else if (word(1:7) == 'keyence') then
    	write(*,*) 'YES'
    else
    	write(*,*) 'NO'
    end if
    
    stop
end program sample