#pragma GCC optimize ("Ofast") #include using namespace std; #define MD (1000000007U) void*wmem; char memarr[96000000]; template inline void walloc1d(T **arr, int x, void **mem = &wmem){ static int skip[16] = {0, 15, 14, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1}; (*mem) = (void*)( ((char*)(*mem)) + skip[((unsigned long long)(*mem)) & 15] ); (*arr)=(T*)(*mem); (*mem)=((*arr)+x); } template inline void walloc1d(T **arr, int x1, int x2, void **mem = &wmem){ walloc1d(arr, x2-x1, mem); (*arr) -= x1; } struct mint{ static unsigned md; static unsigned W; static unsigned R; static unsigned Rinv; static unsigned mdninv; static unsigned RR; unsigned val; mint(){ val=0; } mint(int a){ val = mulR(a); } mint(unsigned a){ val = mulR(a); } mint(long long a){ val = mulR(a); } mint(unsigned long long a){ val = mulR(a); } int get_inv(long long a, int md){ long long t=a; long long s=md; long long u=1; long long v=0; long long e; while(s){ e=t/s; t-=e*s; u-=e*v; swap(t,s); swap(u,v); } if(u<0){ u+=md; } return u; } void setmod(unsigned m){ int i; unsigned t; W = 32; md = m; R = (1ULL << W) % md; RR = (unsigned long long)R*R % md; switch(m){ case 104857601: Rinv = 2560000; mdninv = 104857599; break; case 998244353: Rinv = 232013824; mdninv = 998244351; break; case 1000000007: Rinv = 518424770; mdninv = 2226617417U; break; case 1000000009: Rinv = 171601999; mdninv = 737024967; break; case 1004535809: Rinv = 234947584; mdninv = 1004535807; break; case 1007681537: Rinv = 236421376; mdninv = 1007681535; break; case 1012924417: Rinv = 238887936; mdninv = 1012924415; break; case 1045430273: Rinv = 254466304; mdninv = 1045430271; break; case 1051721729: Rinv = 257538304; mdninv = 1051721727; break; default: Rinv = get_inv(R, md); mdninv = 0; t = 0; for(i=(0);i<((int)W);i++){ if(t%2==0){ t+=md; mdninv |= (1U<> W); if(t >= md){ t -= md; } return t; } unsigned reduce(unsigned long long T){ unsigned m = (unsigned)T * mdninv; unsigned t = (unsigned)((T + (unsigned long long)m*md) >> W); if(t >= md){ t -= md; } return t; } unsigned get(){ return reduce(val); } inline mint &operator++(){ (*this) += 1; return *this; } inline mint &operator--(){ (*this) -= 1; return *this; } inline mint operator++(int a){ mint res(*this); (*this) += 1; return res; } inline mint operator--(int a){ mint res(*this); (*this) -= 1; return res; } mint &operator+=(mint a){ val += a.val; if(val >= md){ val -= md; } return *this; } mint &operator-=(mint a){ if(val < a.val){ val = val + md - a.val; } else{ val -= a.val; } return *this; } mint &operator*=(mint a){ val = reduce((unsigned long long)val*a.val); return *this; } mint &operator/=(mint a){ return *this *= a.inverse(); } mint operator+(mint a){ return mint(*this)+=a; } mint operator-(mint a){ return mint(*this)-=a; } mint operator*(mint a){ return mint(*this)*=a; } mint operator/(mint a){ return mint(*this)/=a; } mint operator+(int a){ return mint(*this)+=mint(a); } mint operator-(int a){ return mint(*this)-=mint(a); } mint operator*(int a){ return mint(*this)*=mint(a); } mint operator/(int a){ return mint(*this)/=mint(a); } mint operator+(long long a){ return mint(*this)+=mint(a); } mint operator-(long long a){ return mint(*this)-=mint(a); } mint operator*(long long a){ return mint(*this)*=mint(a); } mint operator/(long long a){ return mint(*this)/=mint(a); } mint operator-(void){ mint res; if(val){ res.val=md-val; } else{ res.val=0; } return res; } operator bool(void){ return val!=0; } operator int(void){ return get(); } operator long long(void){ return get(); } mint inverse(){ int a = val; int b = md; int u = 1; int v = 0; int t; mint res; while(b){ t = a / b; a -= t * b; swap(a, b); u -= t * v; swap(u, v); } if(u < 0){ u += md; } res.val = (unsigned long long)u*RR % md; return res; } mint pw(unsigned long long b){ mint a(*this); mint res; res.val = R; while(b){ if(b&1){ res *= a; } b >>= 1; a *= a; } return res; } bool operator==(int a){ return mulR(a)==val; } bool operator!=(int a){ return mulR(a)!=val; } } ; unsigned mint::md; unsigned mint::W; unsigned mint::R; unsigned mint::Rinv; unsigned mint::mdninv; unsigned mint::RR; mint operator+(int a, mint b){ return mint(a)+=b; } mint operator-(int a, mint b){ return mint(a)-=b; } mint operator*(int a, mint b){ return mint(a)*=b; } mint operator/(int a, mint b){ return mint(a)/=b; } mint operator+(long long a, mint b){ return mint(a)+=b; } mint operator-(long long a, mint b){ return mint(a)-=b; } mint operator*(long long a, mint b){ return mint(a)*=b; } mint operator/(long long a, mint b){ return mint(a)/=b; } inline int my_getchar(){ static char buf[1048576]; static int s = 1048576; static int e = 1048576; if(s == e && e == 1048576){ e = fread(buf, 1, 1048576, stdin); s = 0; } if(s == e){ return EOF; } return buf[s++]; } inline void rd(int &x){ int k; int m=0; x=0; for(;;){ k = my_getchar(); if(k=='-'){ m=1; break; } if('0'<=k&&k<='9'){ x=k-'0'; break; } } for(;;){ k = my_getchar(); if(k<'0'||k>'9'){ break; } x=x*10+k-'0'; } if(m){ x=-x; } } struct MY_WRITER{ char buf[1048576]; int s; int e; MY_WRITER(){ s = 0; e = 1048576; } ~MY_WRITER(){ if(s){ fwrite(buf, 1, s, stdout); } } } ; MY_WRITER MY_WRITER_VAR; void my_putchar(int a){ if(MY_WRITER_VAR.s == MY_WRITER_VAR.e){ fwrite(MY_WRITER_VAR.buf, 1, MY_WRITER_VAR.s, stdout); MY_WRITER_VAR.s = 0; } MY_WRITER_VAR.buf[MY_WRITER_VAR.s++] = a; } inline void wt_L(char a){ my_putchar(a); } inline void wt_L(int x){ int s=0; int m=0; char f[10]; if(x<0){ m=1; x=-x; } while(x){ f[s++]=x%10; x/=10; } if(!s){ f[s++]=0; } if(m){ my_putchar('-'); } while(s--){ my_putchar(f[s]+'0'); } } inline void wt_L(mint x){ int i; i = (int)x; wt_L(i); } struct combination_mint{ mint*fac; mint*ifac; void init(int n, void **mem = &wmem){ int i; walloc1d(&fac, n, mem); walloc1d(&ifac, n, mem); fac[0] = 1; for(i=(1);i<(n);i++){ fac[i] = fac[i-1] * i; } ifac[n-1] = 1 / fac[n-1]; for(i=n-2;i>=0;i--){ ifac[i] = ifac[i+1] * (i+1); } } mint C(int a, int b){ if(b < 0 || b > a){ return 0; } return fac[a]*ifac[b]*ifac[a-b]; } mint P(int a, int b){ if(b < 0 || b > a){ return 0; } return fac[a]*ifac[a-b]; } mint H(int a, int b){ if(a==0 && b==0){ return 1; } if(a<=0 || b<0){ return 0; } return C(a+b-1, b); } } ; mint ans; combination_mint C; int A[11]; mint contributions; int N; int main(){ int i; wmem = memarr; { mint x; x.setmod(MD); } C.init(200000+10); rd(N); { int PiIOrLma; for(PiIOrLma=(0);PiIOrLma<(9);PiIOrLma++){ rd(A[PiIOrLma]); } } for(i=(9)-1;i>=(0);i--){ int j; if(A[i] == 0){ continue; } mint contribution = 1; int n = N-1; for(j=(0);j<(9);j++){ if(n == 0){ break; } if(i == j){ contribution *= C.C(n, A[j]-1); n -= A[j]-1; } else{ contribution *= C.C(n, A[j]); n -= A[j]; } } contributions += contribution * (i+1); } for(i=(0);i<(N);i++){ ans += contributions; contributions *= 10; } wt_L(ans); wt_L('\n'); return 0; } // cLay version 20210405-1 // --- original code --- // //no-unlocked // mint ans; // combination_mint C; // int A[11]; // mint contributions; // int N; // { // C.init(2d5+10); // rd(N, A(9)); // rrep(i,9){ // if(A[i] == 0) continue; // mint contribution = 1; // int n = N-1; // rep(j, 9){ // if(n == 0) break; // if(i == j){ // contribution *= C.C(n, A[j]-1); // n -= A[j]-1; // }else{ // contribution *= C.C(n, A[j]); // n -= A[j]; // } // } // contributions += contribution * (i+1); // } // rep(i, N){ // ans += contributions; // contributions *= 10; // } // wt(ans); // }