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

m.times do
  b,c = gets.split.map(&:to_i)
    b.times do |i|
      if a[i] < c
        a[i] = c
      else
        break
      end
    end
  a.sort!
end

puts a.sum
