nm = STDIN.gets.chomp.split(' ').map(&:to_i)

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

inputs = []
nm[1].times do
  inputs << STDIN.gets.chomp.split(' ').map(&:to_i)
end

inputs.each do |array|
  (1..array[0]).each do |_|
     a << array[1]
   end
end

a.sort!{ |x, y| y <=> x }

puts a.take(nm[0]).inject(:+)