#include <bits/stdc++.h>
//#include <atcoder/lazysegtree>
//using namespace atcoder;
#pragma GCC optimize("O3")
using namespace std;
#define reps(i,s,n) for(int i = s; i < n; i++)
#define rep(i,n) reps(i,0,n)
#define Rreps(i,n,e) for(int i = n - 1; i >= e; --i)
#define Rrep(i,n) Rreps(i,n,0)
#define ALL(a) a.begin(), a.end()

using ll = long long;
using vec = vector<ll>;
using mat = vector<vec>;

ll N,M,H,W,Q,K,A,B;
string S;
using P = pair<ll, ll>;
using tp = tuple<ll, ll, ll>;
const ll INF = (1LL<<60);

template<class T> bool chmin(T &a, const T b){
    if(a > b) {a = b; return true;}
    else return false;
}
template<class T> bool chmax(T &a, const T b){
    if(a < b) {a = b; return true;}
    else return false;
}
template<class T> void my_printv(std::vector<T> v,bool endline = true){
    if(!v.empty()){
        for(std::size_t i{}; i<v.size()-1; ++i) std::cout<<v[i]<<" ";
        std::cout<<v.back();
    }
    if(endline) std::cout<<std::endl;
}

int main() {
    cin.tie(nullptr);
    ios::sync_with_stdio(false);
    vec mods;
    for(ll p : {2, 3, 5, 7, 11, 13, 17}){
        ll res = 1;
        while(res < 1e+8) res *= p;
        mods.push_back(res);
    }
    cin>>N>>K;
    vec a(N);
    rep(i, N) cin>>a[i];
    unordered_set<ll> small;
    set<vec> large;
    rep(s, 1<<N){
        if(bitset<32>(s).count() >= K){
            ll wa{};
            rep(i, N) if((s>>i)&1) wa += a[i];
            small.insert(wa);
            ll temp = 1;
            rep(i, N) if((s>>i)&1) {
                if(INF / a[i] < temp) {temp = INF; break;}
                temp *= a[i];
            }
            if(temp < INF){
                small.insert(temp);
            }else {
                vec hash;
                for (ll p : mods) {
                    ll seki = 1;
                    rep(i, N) if ((s >> i) & 1) (seki *= a[i]) %= p;
                    hash.push_back(seki);
                }
                large.insert(hash);
            }
        }
    }
    cout<<small.size() + large.size()<<endl;
}