题解 P4859 【已经没有什么好害怕的了】
思路
大佬都说这是套路题……嘤嘤嘤我又被吊打了
显然,这题是要
首先思考一下性质:
为了方便,下面令
显然,
考虑
1、若它匹配了一个比它小的
2、若它匹配了一个比它大的
所以,我们
设
容易得到
其中
接下来,记
那么恰好
从大往小递推,有
或者用另一种容斥,有
复杂度
代码
#include<bits/stdc++.h>
namespace my_std{
using namespace std;
#define pii pair<int,int>
#define fir first
#define sec second
#define MP make_pair
#define rep(i,x,y) for (int i=(x);i<=(y);i++)
#define drep(i,x,y) for (int i=(x);i>=(y);i--)
#define go(x) for (int i=head[x];i;i=edge[i].nxt)
#define sz 2020
typedef long long ll;
const ll mod=1e9+9;
template<typename T>
inline void read(T& t)
{
t=0;char f=0,ch=getchar();
double d=0.1;
while(ch>'9'||ch<'0') f|=(ch=='-'),ch=getchar();
while(ch<='9'&&ch>='0') t=t*10+ch-48,ch=getchar();
if(ch=='.')
{
ch=getchar();
while(ch<='9'&&ch>='0') t+=d*(ch^48),d*=0.1,ch=getchar();
}
t=(f?-t:t);
}
template<typename T,typename... Args>
inline void read(T& t,Args&... args){read(t); read(args...);}
void file()
{
#ifndef ONLINE_JUDGE
freopen("a.txt","r",stdin);
#endif
}
// inline ll mul(ll a,ll b){ll d=(ll)(a*(double)b/mod+0.5);ll ret=a*b-d*mod;if (ret<0) ret+=mod;return ret;}
}
using namespace my_std;
ll ksm(ll x,int y)
{
ll ret=1;
for (;y;y>>=1,x=x*x%mod) if (y&1) ret=ret*x%mod;
return ret;
}
ll inv(ll x){return ksm(x,mod-2);}
ll fac[sz],_fac[sz];
void init(){fac[0]=_fac[0]=1;rep(i,1,sz-1) _fac[i]=inv(fac[i]=fac[i-1]*i%mod);}
ll C(int n,int m){return n>=m&&m>=0?fac[n]*_fac[m]%mod*_fac[n-m]%mod:0;}
int n,K;
int a[sz],b[sz],r[sz];
ll dp[sz][sz],f[sz];
ll ans[sz];
int main()
{
file();
init();
read(n,K);
if ((n+K)&1) return puts("0"),0;
K=(n+K)>>1;
rep(i,1,n) read(a[i]);
rep(i,1,n) read(b[i]);
sort(a+1,a+n+1);sort(b+1,b+n+1);
int c=0;
rep(i,1,n)
{
while (c<n&&b[c+1]<a[i]) ++c;
r[i]=c;
}
dp[0][0]=1;
rep(i,1,n)
rep(j,0,i)
dp[i][j]=(dp[i-1][j]+(j?1ll*(r[i]-j+1)*dp[i-1][j-1]%mod:0ll))%mod;
rep(i,0,n) f[i]=dp[n][i]*fac[n-i]%mod;
drep(i,n,K)
{
ans[i]=f[i];
rep(j,i+1,n) ans[i]=(ans[i]-ans[j]*C(j,i)%mod+mod)%mod;
}
cout<<ans[K];
return 0;
}