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

memo = Hash.new
ans = 0

A.each do |a|
  if !memo[a]
    v = 0

    A.each do |b|
      v += a.pow(b)
    end

    memo[a] = v
  end

  ans += memo[a]
end

puts ans