gets;$/=' ';a=$<.map &:to_i $><<(a|[]==[b=a[0]]?b/~-n<4?[n,0]:[0,n]:a.minmax.rotate.map{|i|a.count i})*' '