結果
| 問題 | No.764 浮動点 | 
| コンテスト | |
| ユーザー |  tails | 
| 提出日時 | 2018-12-12 00:58:04 | 
| 言語 | cLay (20241019-1) | 
| 結果 | 
                                AC
                                 
                             | 
| 実行時間 | 4 ms / 1,500 ms | 
| コード長 | 572 bytes | 
| コンパイル時間 | 2,697 ms | 
| コンパイル使用メモリ | 174,384 KB | 
| 実行使用メモリ | 5,376 KB | 
| 最終ジャッジ日時 | 2024-07-05 13:14:13 | 
| 合計ジャッジ時間 | 3,580 ms | 
| ジャッジサーバーID (参考情報) | judge1 / judge3 | 
(要ログイン)
| ファイルパターン | 結果 | 
|---|---|
| sample | AC * 3 | 
| other | AC * 23 | 
ソースコード
double n,r,l[2000];
double f(double r,double a,double b){
       if(a<0)a=0;
       if(b<0)b=0;
       if(a+b<=r)return 0;
       if(a>=r+b)return b*b*PI;
       if(b>=r+a)return a*a*PI;
       double ta=acos((r*r+a*a-b*b)/(r*a*2));
       double tb=acos((r*r+b*b-a*a)/(r*b*2));
       return a*a*(ta-sin(2*ta)/2)+b*b*(tb-sin(2*tb)/2);
}
{
	rd(n,r,l(n+1));
	int am,as,bm,bs;
	as=0;
	bs=sum(l(n+1));
	rep(i,1,n+1){
		am=max[k=0---i-1](l[k]);
		bm=max[k=i---n](l[k]);
		as+=l[i-1];
		bs-=l[i-1];
		wt(f(r,as,bs)-f(r,as,bm*2-bs)-f(r,am*2-as,bs)+f(r,am*2-as,bm*2-bs));
	}
}
            
            
            
        