n = gets.to_i
a = gets.split.map(&:to_i).map.with_index.to_a.sort.reverse
l_p = 0
r_p = n-1
cen = (l_p + r_p) /2
ans = 0
a.each{|ai|
  if ai[1]<cen
    ans += ai[0] * (r_p - ai[1])
    r_p-=1
  else
    ans += ai[0] * (ai[1] - l_p)
    l_p+=1
  end
  cen = (l_p + r_p) /2
}
p ans