#include using namespace std; using ll = long long; #define rep(i,m,n) for(int i=m; i> N >> K; vector A(N); rep(i, 0, N) cin >> A[i]; vector per(N, 0); rep(i, 0, K){ per[N-1-i] = 1; } ll ans = 0LL; do{ ll S = 0LL; rep(i, 0, N){ if(per[i]){ S += A[i]; } } ll S1 = S % mod1, S2 = S % mod2; if(S1 >= S2) ans++; ans %= mod1; }while(next_permutation(all(per))); cout << ans << endl; return 0; }