N, K = gets.split.map(&:to_i)
A = gets.split.map(&:to_i)

def f(nums)
  nums.sum
end

def g(nums)
  nums.inject(:*)
end

set = Hash.new

K.upto(N) do |c|
  A.combination(c) do |nums|
    set[f(nums)] = true
    set[g(nums)] = true
  end
end

puts set.size