[bzoj4563] [Haoi2016]放棋子

　　交换一下行列对答案显然是没有影响的。。

　　所以先把障碍都挪到主对角线上。。然后就是错排问题了.....

　　f[i]=(f[i-1]+f[i-2])*(i-1)

#include<cstdio>
#include<iostream>
#include<cstring>
#include<algorithm>
#define ll long long
using namespace std;
const int modd=10000;
int d[2333],c[2333],b[2333],a[2333];
int i,j,k,n,m;
 
int ra;char rx;
inline int read(){
    rx=getchar(),ra=0;
    while(rx<'0'||rx>'9')rx=getchar();
    while(rx>='0'&&rx<='9')ra*=10,ra+=rx-48,rx=getchar();return ra;
}
inline void addtoc(){
    int len=max(a[0],b[0]),i;
    memset(c,0,(c[0]+1)<<2);
    for(i=1;i<=len;i++){
        c[i]+=a[i]+b[i];
        if(c[i]>=modd)c[i]-=modd,c[i+1]++;
    }
    if(c[len+1])len++;c[0]=len;
}
inline void multoc(int x){
    int i,len=c[0];
    for(i=1;i<=len;i++){
        d[i]+=c[i]*x;
        if(d[i]>=modd)d[i+1]+=d[i]/modd,d[i]%=modd;
    }
    if(d[len+1])len++;
    memcpy(c,d,(len+1)<<2),c[0]=len,
    memset(d,0,(len+1)<<2);
}
int main(){
    n=read();
    a[0]=b[0]=1,a[1]=1,b[1]=0;
    for(i=2;i<=n;i++){
        addtoc(),multoc(i-1);
        memcpy(a+1,b+1,max(a[0],b[0])<<2),a[0]=b[0],
        memcpy(b+1,c+1,max(b[0],c[0])<<2),b[0]=c[0];
    }
    printf("%d",b[b[0]]);
    for(i=b[0]-1;i;i--)printf("%04d",b[i]);puts("");
}