N, M = gets.chomp.split(" ").map(&:to_i);
P = []
A = gets.chomp.split(" ").map(&:to_i);
A.each{|i| P << [1, i]}
M.times{|i|
  P << gets.chomp.split(" ").map(&:to_i);
}

cnt = N
s = 0
P.sort_by{|p| p[1]}.reverse.each{|i|
  b, c = i
  if cnt > b then
    s += b * c
    cnt -= b
  else
    s += cnt * c
    break
  end
}

puts s
