結果

問題 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
権限があれば一括ダウンロードができます

ソースコード

diff # 

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));
	}
}
0