Problem:
Score : 500 points

Problem Statement

Ibis is fighting with a monster.

The health of the monster is H.

Ibis can cast N kinds of spells. Casting the i-th spell decreases the monster's health by A_i, at the cost of B_i Magic Points.

The same spell can be cast multiple times. There is no way other than spells to decrease the monster's health.

Ibis wins when the health of the monster becomes 0 or below.

Find the minimum total Magic Points that have to be consumed before winning.

Constraints

1 \leq H \leq 10^4

1 \leq N \leq 10^3

1 \leq A_i \leq 10^4

1 \leq B_i \leq 10^4

All values in input are integers.

Input

Input is given from Standard Input in the following format:

H N
A_1 B_1
:
A_N B_N

Output

Print the minimum total Magic Points that have to be consumed before winning.

Sample Input 1

9 3
8 3
4 2
2 1

Sample Output 1

4

First, let us cast the first spell to decrease the monster's health by 8, at the cost of 3 Magic Points. The monster's health is now 1.

Then, cast the third spell to decrease the monster's health by 2, at the cost of 1 Magic Point. The monster's health is now -1.

In this way, we can win at the total cost of 4 Magic Points.

Sample Input 2

100 6
1 1
2 3
3 9
4 27
5 81
6 243

Sample Output 2

100

It is optimal to cast the first spell 100 times.

Sample Input 3

9999 10
540 7550
691 9680
700 9790
510 7150
415 5818
551 7712
587 8227
619 8671
588 8228
176 2461

Sample Output 3

139815

Solution in Ruby (2.3.3) (judge verdict: Time Limit Exceeded)

#二分ヒープ
class BinaryHeap
  def initialize
    @heap = Array.new
    @size = 0
  end
  def push(x)
    @size += 1
    upfrom(@size - 1, x)
  end
  def shift
    wk = @heap[0]
    @size -= 1
    downfrom(0, @heap[@size])
    wk
  end
  def first
    @size == 0 ? nil : @heap[0]
  end
  def empty?
    @size == 0
  end

  private

  def upfrom(i, x)
    me = i
    while 0 < me do
      parent = (me - 1) >> 1
      break if @heap[parent] <= x
        @heap[me] = @heap[parent]
        me = parent
    end
    @heap[me] = x
  end
  def downfrom(i, x)
    me = i
    while me < @size do
      child = (me << 1) + 1
      break if child >= @size
      if (child + 1) < @size && (@heap[child + 1] <= @heap[child]) then
        child += 1
      end
      break if x <= @heap[child]
      @heap[me] = @heap[child]
      me = child
    end
    @heap[me] = x
  end
end

H, N = gets.chomp.split(" ").map(&:to_i)
AT = []
N.times{
  AT << gets.chomp.split(" ").map(&:to_i)
}

M = Array.new(H, 10**8)
que = BinaryHeap.new
que.push(0)
M[0] = 0
ans = 10 ** 8
lst = -1
until que.empty?
  d = que.shift
  next if d == lst
  AT.each{|a, b|
    dmg = d + a
    mgc = M[d] + b
    if dmg >= H then
      ans = mgc if ans > mgc
    elsif M[dmg] > mgc then
      M[dmg] = mgc
      que.push(dmg)
    end
  }
  lst = d
end

puts ans