#include <bits/stdc++.h>
using namespace std;
const int p1=31,p2=131;
const int mod1=1e9+7,mod2=1e9+9;
struct hs{
    // int x,y;
    // bool operator<(hs h1)const{
    //     if(x==h1.x)return y<h1.y;
    //     else return x<h1.x;
    // }
    // bool operator==(hs h1)const{
    //     return x==h1.x&&y==h1.y;
    // }
    int x;
    bool operator<(hs h1)const{
        return x<h1.x;
    }
    bool operator==(hs h1)const{
        return x==h1.x;
    }
};
// const hs p = hs{p1,p2};
const hs p = hs{p1};
hs &operator+=(hs &a, hs b) {
    a.x=(a.x+b.x)%mod1;
    // a.y=(a.y+b.y)%mod2;
    return a;
}
hs operator+(hs a, hs b) { return a += b; }
hs &operator-=(hs &a, hs b) {
    a.x=(a.x-b.x+mod1)%mod1;
    // a.y=(a.y-b.y+mod2)%mod2;
    return a;
}
hs operator-(hs a, hs b) { return a -= b; }
hs &operator*=(hs &a, hs b) {
    a.x=(1ll*a.x*b.x)%mod1;
    // a.y=(1ll*a.y*b.y)%mod2;
    return a;
}
hs operator*(hs a, hs b) { return a *= b; }
typedef vector<int> Bigint;
int K;
const int N=1000000000;
const int M=9;
int Pow10[10];
Bigint all;
int topbit(Bigint &a){
    int g=(int)a.size()-1;
    g*=M;
    for(int i=1;i<M;i++)if(a.back()>=Pow10[i])g++;
    // for(auto it:a)cout<<it<<"//";;cout<<"\n";
    // cout<<"topbit="<<g<<"\n";
    return g;
}
void down(Bigint &a){
    int t=topbit(a);
    int x=a.back()/Pow10[t%M];
    // cout<<"t="<<t<<" a.back()="<<a.back()<<"\n";
    a.back()%=Pow10[t%M];
    // cout<<"t="<<t<<" a.back()="<<a.back()<<"\n";
    t%=K;
    if(a.back()==0&&(int)a.size()>1)a.pop_back();
    a[t/M]+=x*Pow10[t%M];
}
void check(Bigint &a){
    while(true){
        // cout<<"??\n";
        if(topbit(a)<K){
            // cout<<"ok\n";
            break;
        }
        while(topbit(a)>=K)down(a);
        for(int i=0;i<(int)a.size();i++){
            if(i==(int)a.size()-1&&a[i]>=N){
                a.push_back(a[i]/N);
                a[i]%=N;
                continue;
            }
            a[i+1]+=a[i]/N;
            a[i]%=N;
        }
    }
    if(a==all)a=vector<int>{0};
}
Bigint operator+(Bigint a,Bigint b){
    if(a.size()<b.size())swap(a,b);
    for(int i=0;i<(int)b.size();i++)a[i]+=b[i];
    check(a);
    return a;
}
Bigint operator-(Bigint a,Bigint b){
    for(int i=0;i<(int)b.size();i++)a[i]-=b[i];
    check(a);
    return a;
}
hs gethash(Bigint a){
    hs now=hs{0};
    for(int i=(int)a.size()-1;i>=0;i--)now=now*p+hs{a[i]};
    return now;
}
int main()
{
    ios::sync_with_stdio(false);
    cin.tie(0);
    int n;
    cin>>n>>K;

    vector<Bigint> a(n);
    vector<hs>has(n);
    map<hs,int> ma;
    Pow10[0]=1;
    for(int i=1;i<10;i++)Pow10[i]=Pow10[i-1]*10;
    {
        int z=K;
        while(z>=M){
            all.push_back(Pow10[M]-1);
            z-=M;
        }
        if(z>0)all.push_back(Pow10[z]-1);
    }
    for(int i=0;i<n;i++){
        string s;cin>>s;
        reverse(s.begin(),s.end());
        for(int j=0;j<(int)s.size();j++){
            if(j%M==0){
                a[i].push_back(0); 
            }
            a[i].back()+=(s[j]-'0')*Pow10[j%M];
        }
        check(a[i]);
        has[i]=gethash(a[i]);
        ma[has[i]]++;
        // for(auto it:a[i])cout<<it<<"//";;cout<<"\n";
    }
    int ans=0;
    hs hall=gethash(all);
    for(int i=0;i<n;i++){
        for(int j=i;j>=0;j--){
            hs h1=gethash(a[i]+a[j]);
            hs h=hall-h1;
            if(h==hall)h=hs{0};
            // cout<<"i="<<i<<" j="<<j<<" "<<h.x<<" "<<h.y<<"\n";
            if(ma.find(h)!=ma.end()){
                ans+=ma[h];
                // cout<<"i="<<i<<" j="<<j<<" ans="<<ma[h]<<"\n";
                // for(auto it:a[i])cout<<it;;cout<<"\n";
                // for(auto it:a[j])cout<<it;;cout<<"\n";
                // for(auto it:(a[i]+a[j]))cout<<it;;cout<<"\n";
            }
        }
        ma[has[i]]--;
    }
    cout<<ans<<"\n";
}