#!/user/bin/env ruby

N, M = gets.chomp.split.map(&:to_i)

a = gets.chomp.split.map(&:to_i)

# bc = []
# while line = gets do
#   tmp = line.chomp.split.map(&:to_i)
#   bc << tmp
# end


# # p N, M 
# # p a
# # p bc
# # p ""

# # Bi項まで見て、cより小さければ書き換える。
# # aをソートする。

# bc.each do |bci|
#   b = bci[0]
#   c = bci[1]

#   b.times do |j|
#     # puts "j: #{j}"
#     if a[j] < c then
#       a[j] = c
#     end
#   end
  
#   a = a.sort
#   # p a
# end

# # p ""
# # p a
# puts a.inject(:+)



# というやりかたでも良いが、単にaに b枚のc を加えてソートして大きい方からNまい取ればよい

while line = gets do
  tmp = line.chomp.split.map(&:to_i)
  a_tmp = a + [tmp[1]] * tmp[0]
  a = a_tmp.sort!.reverse![0...N]
end

puts a.inject(:+)

