use strict;
<>;
my %d = ();
while (<>) {
    chomp;
    $d{length($_) - 2}++;
}
my @l = sort({$d{$b} <=> $d{$a} || $b <=> $a} keys(%d));
print($l[0], "\n");