N = gets.to_i
A = gets.split.map(&:to_i)

ans = 0
cnt = 0

0.upto(N - 2) do |i|
  if A[i] > A[i + 1]
    ans += i - cnt
    cnt += 1
  end
end

puts ans