gets
b=u=[]
gets.split.map{|q|v=q.to_i;i=b.index{|k|k>v};j=i ?i: b.size;u+=(-b.size...-j).to_a;b.insert(j,v);}
p u.size
u.map{|i|puts [-i-1,-i]*' '}