n, m = gets.chomp.split.map(&:to_i)
a = gets.chomp.split.map(&:to_i).sort

m.times do
  b, c = gets.chomp.split.map(&:to_i)

  idx = a.bsearch_index{|x| x < c}
  next if idx.nil?
  cnt = 0
  while a[idx] < c && cnt < b && idx >= 0
    a[idx] = c
    idx += 1
    cnt += 1
  end

  a.sort!
end
puts a.inject(&:+)