// #pragma GCC target("avx2") #pragma GCC optimize("O3") #pragma GCC optimize("unroll-loops") #include using namespace std; #include using namespace atcoder; #include #include #include using namespace __gnu_pbds; #define ALL(a) (a).begin(), (a).end() #define RALL(a) (a).rbegin(), (a).rend() #define FOR(i, start, end) for (int i = start; i < (int)(end); ++i) #define RFOR(i, rstart, rend) for (int i = rstart; i >= (int)(rend); --i) #define REP(i, end) FOR(i, 0, end) #define BIT(x, i) (((x)>>(i))&1) using ll = long long; using ull = unsigned long long; using pii = pair; using pll = pair; constexpr ll LINF = 1LL << 60; constexpr int INF = 1 << 30; template using Graph = vector>; template using TREE = tree, rb_tree_tag, tree_order_statistics_node_update>; template using PQ = priority_queue, greater>; void yes(bool expr) {cout << (expr ? "Yes" : "No") << "\n";} templatevoid chmax(T &a, const T &b) { if (avoid chmin(T &a, const T &b) { if (b istream &operator>>(istream&is,vector&v){for(T &in:v){is>>in;}return is;} template ostream &operator<<(ostream&os,const vector&v){for(auto it=v.begin();it!=v.end();){os<<*it<<((++it)!=v.end()?" ":"\n");}return os;} /* 回文判定 */ bool isPalindrome(const string &s){int sz=s.size(); REP(i,sz/2){if(s[i]!=s[sz-1-i])return false;} return true;} /* 座標圧縮 */ template vector compress(const vector&A){vector ret(A.size()); auto tmp = A; sort(ALL(tmp)); tmp.erase(unique(ALL(tmp)), tmp.end()); REP(i,A.size()) ret[i] = lower_bound(ALL(tmp), A[i]) - tmp.begin(); return ret;} /* 約数列挙 整数nの約数のvectorを返す */ vector enumdiv(ll n){vectors; for(ll i = 1;i*i<=n;i++){if(n%i==0){s.push_back(i);if(i*i!=n)s.push_back(n/i);}}return s;} /* 素因数分解 pair<素数、指数>のvectorを返す */ vector primeDecomposition(ll x){vector ret;ll tmp=x;for(ll i=2;i*i<=x;++i){if(tmp%i==0){ll cnt=0; while(tmp%i==0){tmp/=i;++cnt;}ret.emplace_back(i,cnt);}}if(tmp!=1)ret.emplace_back(tmp,1);return ret;} /* エラトステネスの篩 n未満の素数を列挙。isprimeには素数かどうかが入っている */ vector isprime;vector era(int n) {isprime.resize(n, true);vector res;isprime[0] = false; isprime[1] = false;for (int i = 2; i < n; ++i){if (isprime[i]) {res.push_back(i);for (int j = i*2; j < n; j += i) isprime[j] = false;}}return res;} /* トポロジカルソート */ vector topo_sort(const Graph &G){int n = G.size();vector deg(n), ret;for(const auto &v:G)for(const auto &to:v) ++deg[to];queue que;REP(i,n) if(deg[i]==0)que.push(i);while(!que.empty()){const int from = que.front();que.pop();ret.push_back(from);for(const auto &to:G[from])if(--deg[to]==0) que.push(to);}return ret;}; // using mint = modint998244353; using mint = modint; int main() { ios::sync_with_stdio(false); cin.tie(0); cout.tie(0); int n,p,q; cin >> n >> p >> q; mint::set_mod(p); vector a(n); cin >> a; sort(ALL(a)); vector pow10(2000005,1),pow9(2000005,1),pow7(2000005,1),pow5(2000005,1); REP(i,2000000){ pow10[i+1] = pow10[i] * 10; pow9[i+1] = pow9[i] * 9; pow7[i+1] = pow7[i] * 7; pow5[i+1] = pow5[i] * 5; } vector dp(4,vector(p,0)); ll ans=0; REP(i,n){ auto ndp = dp; //新規に数を追加する場合 ndp[1][pow10[a[i]].val()] += 1; //2個目 REP(j,p){ int nj = (j + pow9[a[i]].val())%p; ndp[2][nj] += dp[1][j]; } //3個目 REP(j,p){ int nj = (j + pow7[a[i]].val())%p; ndp[3][nj] += dp[2][j]; } //4個目 REP(j,p){ int nj = (j + pow5[a[i]].val())%p; if(nj==q) ans += dp[3][j]; } swap(dp,ndp); } cout << ans << endl; return 0; }