info=gets.chomp.split(" ").map(&:to_i)
a=gets.chomp.split(" ").map(&:to_i)
def Quicksort(_list,l,r)
	i=l+1
	k=r
	while(i<k)
		i+=1 if(_list[i]<_list[l] and i<r)
		k-=1 if(_list[k]>=_list[l] and k>l)
		if(i<k)
			w=_list[i]
			_list[i]=_list[k]
			_list[k]=w
		end
	end
	if(_list[l]>_list[k])
		w=_list[k]
		_list[k]=_list[l]
		_list[l]=w
	end
	Quicksort(_list,l,k-1) if(l<k-1)
	Quicksort(_list,k+1,r) if(k+1<r)
	return _list
end
a=Quicksort(a,0,info[0]-1)
min_val=a[0]
info[1].times do|i|
	bc=gets.chomp.split(" ").map(&:to_i)
	a=Quicksort(a,0,info[0]-1)
	min_val=a[0]
	if(min_val<bc[1])
		ctrs_val=min_val
		min_val=bc[1]
		count=0
		(a.size).times do|j|
			if(count==bc[0])
				break
			end
			if(a[j]<=min_val)
				a[j]=min_val
				count+=1
			end
		end
	end
end
print a.sum