#include<bits/stdc++.h>
#define ff first
#define ss second
#define pb push_back
typedef long long ll;
using namespace std;
typedef pair<int,int> pii;

const int nmods=2;
const int mods[nmods]={998244353,1000000007};
int mod=998244353;
inline int add(int x,int y){int ret=x+y;if(ret>=mod)ret-=mod;return ret;}
inline int sub(int x,int y){int ret=x-y;if(ret<0)ret+=mod;return ret;}
inline int mul(int x,int y){return ((ll)x*y)%mod;}
inline int step(int base,int pw){int ret=1;while(pw){if(pw&1)ret=mul(ret,base);base=mul(base,base);pw>>=1;}return ret;}
inline int invv(int x){return step(x,mod-2);}

const int K=20050;
const int N=505;

int a[N][K];
char s[K];
void Add(int idx,int l,int r,int k){
    for(int i=0;i<r-l+1;i++){
        a[idx][i]+=s[r-i]-'0';
    }
    for(int i=0;i<k;i++){
        if(a[idx][i]>=10){
            int carry=a[idx][i]/10;
            int newVal=a[idx][i]%10;
            a[idx][i]=newVal;
            a[idx][(i+1)%k]+=carry;
        }
    }
}

array<int,nmods> operator + (const array<int,nmods>& a, const array<int,nmods>& b){
    array<int,nmods> ans;
    for(int j=0;j<nmods;j++){
        mod=mods[j];
        ans[j]=add(a[j],b[j]);
    }
    return ans;
}

array<int,nmods> operator - (const array<int,nmods>& a, const array<int,nmods>& b){
    array<int,nmods> ans;
    for(int j=0;j<nmods;j++){
        mod=mods[j];
        ans[j]=sub(a[j],b[j]);
    }
    return ans;
}

array<int,nmods> operator * (const array<int,nmods>& a, int b){
    array<int,nmods> ans;
    for(int j=0;j<nmods;j++){
        mod=mods[j];
        ans[j]=mul(a[j],b);
    }
    return ans;
}

array<int,nmods> operator + (const array<int,nmods>& a, int b){
    array<int,nmods> ans;
    for(int j=0;j<nmods;j++){
        mod=mods[j];
        ans[j]=add(a[j],b);
    }
    return ans;
}

array<int,nmods> A[N];

ll ans;
void Try(array<int,nmods> val,int n){
    //printf("val: %i\n",val[1]);
    /*map<array<int,nmods>,int> cnt;
    for(int i=1;i<=n;i++){
        cnt[val-A[i]]++;
        printf("%i\n",(val-A[i])[1]);
    }*/

    for(int i=1;i<=n;i++){
        for(int j=i;j<=n;j++){
            for(int k=j;k<=n;k++){
                if(A[i]+A[j]+A[k]==val)ans++;
               // printf("sum %i\n",(A[i]+A[j]+A[k])[1]);
            }
        }
    }
}

int main(){
    int n,k;
    scanf("%i %i",&n,&k);
    for(int i=1;i<=n;i++){
        scanf("%s",s+1);
        int m=strlen(s+1);
        for(int j=m;j>0;j-=k){
            Add(i,max(1,j-k+1),j,k);
        }
    }
    for(int i=1;i<=n;i++){
        for(int j=0;j<nmods;j++)A[i][j]=0;
        for(int j=k-1;j>=0;j--){
            A[i]=A[i]*10;
            A[i]=A[i]+a[i][j];
        }
        //printf("%i\n",A[i][0]);
    }

    array<int,nmods> val;
    for(int i=0;i<nmods;i++)val[i]=0;
    Try(val,n);

    for(int i=0;i<k;i++){
        val=val*10;
        val=val+9;
    }
    Try(val,n);

    for(int i=0;i<nmods;i++)val[i]=0;
    val=val+1;
    for(int i=0;i<k;i++){
        val=val*10;
        if(i+1==k){
            val=val+8;
        }else{
            val=val+9;
        }
    }
    Try(val,n);

    printf("%lld\n",ans);

    return 0;
}