n=gets.to_i
a=gets.split.map &:to_i
cnt=0
(0..n-1).each do |i|
  min=i
  (i..n-1).each do |j|
    if a[min] > a[j]
      min=j
    end
  end
  if i!=min
    a[i], a[min] = a[min], a[i]
    cnt+=1
  end
end
puts a*' '
puts cnt