import bisect
import copy
import decimal
import fractions
import heapq
import itertools
import math
import random
import sys
import time
from collections import Counter,deque,defaultdict
from functools import lru_cache,reduce
from heapq import heappush,heappop,heapify,heappushpop,_heappop_max,_heapify_max
def _heappush_max(heap,item):
    heap.append(item)
    heapq._siftdown_max(heap, 0, len(heap)-1)
def _heappushpop_max(heap, item):
    if heap and item < heap[0]:
        item, heap[0] = heap[0], item
        heapq._siftup_max(heap, 0)
    return item
from math import gcd as GCD
read=sys.stdin.read
readline=sys.stdin.readline
readlines=sys.stdin.readlines
write=sys.stdout.write
#import pypyjit
#pypyjit.set_param('max_unroll_recursion=-1')
#sys.set_int_max_str_digits(10**9)

N,K=map(int,readline().split())
C=[0]+list(map(int,readline().split()))
if N==1:
    if C.index(1)%K==0:
        ans=1
    else:
        ans=0
else:
    num=[]
    for s in range(10**7,10**8):
        CC=[0]*10
        ss=s
        while ss:
            CC[ss%10]+=1
            ss//=10
        if CC[0]:
            continue
        if all(CC[i]<=C[i] for i in range(1,10)):
            num.append((s,CC))
    n=N//2
    dct=defaultdict(int)
    if n==7:
        for s,CC in num:
            CC[0]=s*10**(N-n)%K
            dct[tuple(CC)]+=1
    else:
        for s in range(10**(n-1),10**n):
            if "0" in str(s):
                continue
            CC=[0]*10
            for i in str(s):
                CC[int(i)]+=1
            CC[0]=s*10**(N-n)%K
            dct[tuple(CC)]+=1
    ans=0
    if N-n==7:
        for s,CC in num:
            CC=[(-s)%K]+[C[i]-CC[i] for i in range(1,10)]
            ans+=dct[tuple(CC)]
    else:
        for s in range(10**(N-n-1),10**(N-n)):
            if "0" in str(s):
                continue
            CC=[(-s)%K]+[c for c in C[1:]]
            for i in str(s):
                CC[int(i)]-=1
            ans+=dct[tuple(CC)]
print(ans)