X, K = gets.split.map(&:to_i)
arr = gets.split.map(&:to_i)

win = Array.new(X+1)
win[0] = false
# binding.pry
1.upto(X) do |j|
  win[j] = false
# 各取得可能数毎に見て、一つでも条件を満たせばこちら手番の勝ち
  K.times do |i|
# arr[i] <= j 残石が取得可能数以上
# !win[j - arr[i]] 残石 - 取得数の結果が負けの時(取得後は相手手番となる為)
    win[j] |= arr[i] <= j && !win[j - arr[i]]
  end
end

puts win[X] ? "Alice" : "Bob"