結果
問題 |
No.2873 Kendall's Tau
|
ユーザー |
![]() |
提出日時 | 2024-09-06 22:25:53 |
言語 | cLay (20241019-1) |
結果 |
WA
|
実行時間 | - |
コード長 | 461 bytes |
コンパイル時間 | 6,790 ms |
コンパイル使用メモリ | 228,668 KB |
実行使用メモリ | 17,028 KB |
最終ジャッジ日時 | 2024-09-06 22:26:02 |
合計ジャッジ時間 | 9,014 ms |
ジャッジサーバーID (参考情報) |
judge4 / judge3 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 3 |
other | AC * 4 WA * 26 |
ソースコード
ll@n,@(x,y)[n],p=0,q=0,r=0,s=0,a,i,j; coordcomp(n,x); coordcomp(n,y); sortA(n,y,x); for(i=0;i<n;){ a=y[i]; for(j=i;j<n&&y[j]==a;++j){ } s+=i*(j-i); i=j; } sortA(n,x,y); for(i=0;i<n;){ a=x[i]; for(j=i;j<n&&x[j]==a;++j){ } r+=i*(j-i); i=j; } fenwick<ll>f; f.malloc(n,1); for(i=0;i<n;){ a=x[i]; for(j=i;j<n&&x[j]==a;++j){ p+=f.range(0,y[j]-1); q+=f.range(y[j]+1,n-1); } for(j=i;j<n&&x[j]==a;++j){ f.add(y[i],1); } i=j; } wt((p-q)/sqrt(r*s));