n=gets.to_i
a=gets.split.map &:to_i
b=a.sort
c=0
d=[]
while a!=b do
  n.times do |i|
    if a[i]!=b[i]
      g=a[i..-1].index(b[i])+i
      d<< [i,g]
      gg=a[i]
      a[i]=a[g]
      a[g]=gg
      c+=1
      break
    end
  end
end
p c
d.each do |e|
  print e[0]," ",e[1],"\n"
end