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=[(0,[0]*10)]
    for _ in range(7):
        prev=num
        num=[]
        for s,CC in prev:
            for i in range(1,10):
                CCC=CC[:]
                CCC[i]+=1
                if all(ccc<=c for c,ccc in zip(C,CCC)):
                    num.append((s*10+9,CCC))
    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)