結果

問題 No.703 ゴミ拾い Easy
ユーザー tailstails
提出日時 2018-06-15 23:56:35
言語 cLay
(20241019-1)
結果
WA  
実行時間 -
コード長 424 bytes
コンパイル時間 2,324 ms
コンパイル使用メモリ 172,968 KB
実行使用メモリ 16,512 KB
最終ジャッジ日時 2024-07-05 13:06:16
合計ジャッジ時間 10,324 ms
ジャッジサーバーID
（参考情報） 		judge2 / judge5
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 4
other AC * 18 WA * 25 TLE * 1 -- * 2
権限があれば一括ダウンロードができます

ソースコード

diff # 

ll n,a[4d5],x[4d5],y[4d5];
ll d,l;
{
	ll iz;
	rd(n,a(n),x(n),y(n));
	iz=n-1;
	ll j;
	for(j=n-2;j>=0;--j){
		ll ib,iy,lb,ly,l1,l2;
		ib=iz;
		lb=(x[j]-a[iz])**2+y[j]**2;
		iy=ib;
		while(--iy>=j&&a[iy+1]>x[j]){
			ly=(x[j]-a[iy])**2+y[j]**2+(x[iy+1]-a[iz])**2+y[iy+1]**2;
			if(ly<=lb){
				lb=ly;
				ib=iy;
			}
		}
		if(ib<iz){
			d+=(x[ib+1]-a[iz])**2+y[ib+1]**2;
			iz=ib;
		}
	}
	d+=(x[0]-a[iz])**2+y[0]**2;
	wt(d+l);
}
0