結果
| 問題 | No.764 浮動点 | 
| コンテスト | |
| ユーザー |  tails | 
| 提出日時 | 2018-12-12 01:15:08 | 
| 言語 | cLay (20241019-1) | 
| 結果 | 
                                AC
                                 
                             | 
| 実行時間 | 3 ms / 1,500 ms | 
| コード長 | 462 bytes | 
| コンパイル時間 | 2,802 ms | 
| コンパイル使用メモリ | 174,600 KB | 
| 実行使用メモリ | 5,376 KB | 
| 最終ジャッジ日時 | 2024-07-05 13:14:09 | 
| 合計ジャッジ時間 | 3,865 ms | 
| ジャッジサーバーID (参考情報) | judge1 / judge4 | 
(要ログイン)
| ファイルパターン | 結果 | 
|---|---|
| sample | AC * 3 | 
| other | AC * 23 | 
ソースコード
int n;
double r,l[2000],a,b,c,d;
double f(double a,double b){
	if(a<0)a=0;
	if(b<0)b=0;
	if(a+b<=r)return 0;
	if(b+r<=a)return b*b*PI;
	if(a+r<=b)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));
	b=sum(l(n+1));
	rep(i,n){
		a+=l[i];
		b-=l[i];
		c=max[k=0---i](l[k])*2-a;
		d=max[k=i+1---n](l[k])*2-b;
		wt(f(a,b)-f(a,d)-f(c,b)+f(c,d));
	}
}
            
            
            
        