import List
main=interact$unlines.(1#).groupBy(f$f.(==)).sortBy(f$f.compare).lines
f=(.(0-).read.last.words)
n#(a:x)=map(shows n" "++)a++(n+length a)#x
n#x=[]