count = Hash.new(0)
ARGF.each {|line|
	line.split.each {|word| count[word.downcase] += 1 }
}
(count.sort {|a,b| (b[1]<=>a[1]).nonzero? || (a[0] <=> b[0])}).each {|word,count|
	print "#{count}\t#{word}\n";
}