import List m@main=readLn>>=print.concat.sort.map(map fst).groupBy(\x y->snd x==snd y).f>>m f x=x`zip`scanl1(/=)(zipWith(<)x(99:x))