#include<cstdio>#include<cstring>#include<cctype>#include<algorithm>using namespace std;#define rep(i,s,t) for(int i=s;i<=t;i++)#define dwn(i,s,t) for(int i=s;i>=t;i--)#define clr(x,c) memset(x,c,sizeof(x))#define ll long longint read(){    int x=0;char c=getchar();    while(!isdigit(c)) c=getchar();    while(isdigit(c)) x=x*10+c-‘0‘,c=getchar();    return x;}const ll mod=1e9+7;ll f[16][16][16][16][16][6];int a[6];ll dp(int a,int b,int c,int d,int e,int lt){    if(a+b+c+d+e==0) return 1;    if(f[a][b][c][d][e][lt]) return f[a][b][c][d][e][lt];    ll ans=0;    if(a) ans+=(a-(lt==2))*dp(a-1,b,c,d,e,1);    if(b) ans+=(b-(lt==3))*dp(a+1,b-1,c,d,e,2);    if(c) ans+=(c-(lt==4))*dp(a,b+1,c-1,d,e,3);    if(d) ans+=(d-(lt==5))*dp(a,b,c+1,d-1,e,4);    if(e) ans+=e*dp(a,b,c,d+1,e-1,5);    return f[a][b][c][d][e][lt]=ans%mod;}int main(){    int n=read(),u;    rep(i,1,n) u=read(),++a[u];    printf("%lld\n",dp(a[1],a[2],a[3],a[4],a[5],0));    return 0;}

　　有n个木块排成一行，从左到右依次编号为1~n。你有k种颜色的油漆，其中第i种颜色的油漆足够涂ci个木块。
所有油漆刚好足够涂满所有木块，即c1+c2+...+ck=n。相邻两个木块涂相同色显得很难看，所以你希望统计任意两
个相邻木块颜色不同的着色方案。

　　第一行为一个正整数k，第二行包含k个整数c1, c2, ... , ck。

　　输出一个整数，即方案总数模1,000,000,007的结果。

 100%的数据满足：1 <= k <= 15, 1 <= ci <= 5