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 LuaJIT (2.0.4) (judge verdict: Wrong Answer)

local mce, mma, mmi = math.ceil, math.max, math.min
local h, n = io.read("*n", "*n")
local z = {}
for i = 1, 10000 do
  z[i] = 0
end
for i = 1, n do
  local a, b = io.read("*n", "*n")
  z[a] = mmi(z[a], b)
end
local t = {}
local inf = 1000000007
for i = 1, h do
  t[i] = inf
end
for a = 1, 10000 do
  local b =z[a]
  if 0 < b then
    for src = h - 1, 1, -1 do
      local lim = mce((h - src) / a)
      for j = 1, lim do
        local dst = mmi(h, src + a * j)
        t[dst] = mmi(t[dst], t[src] + b * j)
      end
    end
    do -- src = 0
      local lim = mce(h / a)
      for j = 1, lim do
        local dst = mmi(h, a * j)
        t[dst] = mmi(t[dst], b * j)
      end
    end
  end
end
print(t[h])