题解:
裸的令人发指的$FFT$。
建立数轴,每出现一个长度就在当前长度位置上$+1$。
自乘卷积,得到的是两根长度之和为$i$的对数$*2$。
然后两边之和小于第三边,直接扫一边。
用排列数随便算一下总方案数。
代码:
#include<cstdio> #include<cstring> #include<algorithm> using namespace std; #define N 300050 #define ll long long #define MOD 998244353 template <typename T> inline void read(T&x) { T f=1,c=0;char ch=getchar(); while(ch<'0'||ch>'9'){if(ch=='-')f=-1;ch=getchar();} while(ch>='0'&&ch<='9'){c=c*10+ch-'0';ch=getchar();} x = f*c; } ll fastpow(ll x,int y) { ll ret = 1; while(y) { if(y&1)ret=ret*x%MOD; x = x*x%MOD; y>>=1; } return ret; } int to[N],lim=1,l; ll W[N],inv; void ntt(ll *a,int len,int k) { for(int i=0;i<len;i++) if(i<to[i])swap(a[i],a[to[i]]); for(int i=1;i<len;i<<=1) { ll w0 = W[i]; for(int j=0;j<len;j+=(i<<1)) { ll w = 1; for(int o=0;o<i;o++,w=w*w0%MOD) { ll w1 = a[j+o],w2 = a[j+o+i]*w%MOD; a[j+o] = (w1+w2)%MOD; a[j+o+i] = (w1-w2+MOD)%MOD; } } } if(k==-1) { for(int i=1;i<(len>>1);i++)swap(a[i],a[len-i]); for(int i=0;i<len;i++)a[i]=a[i]*inv%MOD; } } int T,n; ll a[N],a0[N],c[N],s[N]; void init(int mx) { lim=1,l=0; while(lim<2*mx)lim<<=1,l++; for(int i=1;i<lim;i++)to[i]=((to[i>>1]>>1)|((i&1)<<(l-1))); for(int i=1;i<lim;i<<=1)W[i]=fastpow(3,(MOD-1)/(i<<1)); inv = fastpow(lim,MOD-2); } int main() { // freopen("tt.in","r",stdin); read(T); while(T--) { memset(a,0,sizeof(a)); memset(a0,0,sizeof(a0)); read(n);int mx = 0; for(int x,i=1;i<=n;i++) { read(x); s[i] = x; mx = max(mx,x); a[x]++; a0[x]++; } init(mx); ntt(a,lim,1); for(int i=0;i<lim;i++)c[i]=a[i]*a[i]%MOD; ntt(c,lim,-1); for(int i=1;i<=n;i++)c[s[i]*2]--; double sum = 0,tot = 0; for(int i=1;i<=mx;i++) { sum+=c[i]/2; tot+=sum*a0[i]; } double tt = (double)(1ll*n*(n-1)/2ll*(n-2)/3ll); printf("%.7lf\n",(tt-tot)/tt); } return 0; }