def solution(n, m, coins)
  coins.sort!
  coin_kind = m
  dp = Array.new(n+1).map{Array.new(coin_kind, 0)}
  coins.each_with_index do |coin, index|
    for sum in 0..n do
      tmp = []
      if index == 0 # coin == 1の時
        dp[sum][index] = sum / coin
        next
      end
      if sum == 0
        dp[sum][index] = 0
        next
      end
      dp[sum][index] = [(dp[sum - coin * (sum / coin)][index-1] + (sum/coin)), dp[sum][index - 1]].min
    end
  end
  dp.last.last
end

first_line = gets.split.map(&:to_i)
coins = gets.split.map(&:to_i)
p solution(first_line[0], first_line[1], coins)
