#!/usr/bin/perl

$q = <STDIN>;
chomp $q;
for my $a0 (0..$q-1){
    $s = <STDIN>;
    chomp $s;
    
    if ($s =~ /h.*a.*c.*k.*e.*r.*r.*a.*n.*k/) {
        print "YES\n";
    } else {
        print "NO\n";
    }
}