#include<bits/stdc++.h>
using namespace std;
const int mod=1e9+9;
int fp(int a,int b){
	int res=1;
	for(;b;b>>=1,a=1ll*a*a%mod)
		if(b&1)
			res=1ll*res*a%mod;
	return res;
}
const int N=200011;
#define rep(i,s,t) for(int i=s;i<=t;++i)
#define ll long long
const int mod1=1e9+7,mod2=1e9+9;
int n,k;
char s[N];
int d[N];
int a[N],b[N];
int a1,b1,a2,b2,a3,b3;
int main(){
	scanf("%d%d",&n,&k);
	rep(i,1,n){
		scanf("%s",s);
		int len=strlen(s);
		reverse(s,s+len);
		rep(j,0,k-1)
			d[j]=0;
		rep(j,0,len-1)
			d[j%k]+=(s[j]-'0');
		rep(j,0,len-1)
			d[(j+1)%k]+=d[j%k]/10,d[j%k]%=10;
		for(int j=k-1;~j;--j){
			a[i]=(a[i]*10+d[j])%mod1;
			b[i]=(b[i]*10+d[j])%mod2;
		}
	}
	a2=b2=1;
	for(int j=k-1;j;--j){
		a2=(a2*10+9)%mod1;
		b2=(b2*10+9)%mod2;
	}
	a2=(a2*10+8)%mod1;
	b2=(b2*10+8)%mod2;
	a3=b3=2;
	for(int j=k-1;j;--j){
		a3=(a3*10+9)%mod1;
		b3=(b3*10+9)%mod2;
	}
	a3=(a3*10+7)%mod1;
	b3=(b3*10+7)%mod2;
	for(int j=k-1;~j;--j){
		a1=(a1*10+9)%mod1;
		b1=(b1*10+9)%mod2;
	}
	int ans=0;
	rep(i,1,n)
		rep(j,i,n)
			rep(k,j,n){
				int aa=a[i]+a[j]+a[k],bb=b[i]+b[j]+b[k];
				if(aa>=mod1)aa-=mod1;
				if(aa>=mod1)aa-=mod1;
				if(bb>=mod2)bb-=mod2;
				if(bb>=mod2)bb-=mod2;
				if((aa==0&&bb==0)||(aa==a1&&bb==b1)||(aa==a2&&bb==b2)||(aa==a3&&bb==b3))
					++ans;
			}
	printf("%d\n",ans);
	return 0;
}
/*
4 1
0
1
10
17
*/