let s = read_line ()
let n = String.length s
let _ = for i = 0 to n - 1 do for j = i to n do
  if String.(sub s 0 i ^ sub s j (n - j)) = "keyence" then (print_endline "YES"; exit 0) done done; print_endline "NO"