Submission #1553685


Source Code Expand

$PI=2*atan2 1,0;
($x1,$y1,$x2,$y2)=glob<>;
($xl,$xr)=sort{$a-$b}$x1,$x2;
($yl,$yr)=sort{$a-$b}$y1,$y2;
<>;
@y=map{s/.* //r}sort{$a-$b}grep{/ /;$xl<=$`&&$`<=$xr&&$yl<=$'&&$'<=$yr}<>;
@y=reverse@y if($x1-$x2)*($y1-$y2)<0;
@d=-inf;
for(@y){
	for($l=0,$r=@d;$m=$l+$r>>1,$r-$l>1;){
		${$d[$m]<$_?l:r}=$m;
	}
	$d[$m+1]=$_;
}
if($xr-$xl+1==$#d||$yr-$yl+1==$#d){
	print 100*($xr-$xl+$yr-$yl)+($#d-1)*5*($PI-4)+10*($PI-2)
}else{
	print 100*($xr-$xl+$yr-$yl)+$#d*5*($PI-4)
}

Submission Info

Submission Time
Task C - Fountain Walk
User x20
Language Perl (v5.18.2)
Score 900
Code Size 484 Byte
Status AC
Exec Time 1985 ms
Memory 57724 KB

Compile Error

Unquoted string "l" may clash with future reserved word at ./Main.pl line 11.
Unquoted string "r" may clash with future reserved word at ./Main.pl line 11.
./Main.pl syntax OK

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 900 / 900
Status
AC × 3
AC × 47
Set Name Test Cases
Sample sample_01.txt, sample_02.txt, sample_03.txt
All sample_01.txt, sample_02.txt, sample_03.txt, sample_01.txt, sample_02.txt, sample_03.txt, subtask_1_01.txt, subtask_1_02.txt, subtask_1_03.txt, subtask_1_04.txt, subtask_1_05.txt, subtask_1_06.txt, subtask_1_07.txt, subtask_1_08.txt, subtask_1_09.txt, subtask_1_10.txt, subtask_1_11.txt, subtask_1_12.txt, subtask_1_13.txt, subtask_1_14.txt, subtask_1_15.txt, subtask_1_16.txt, subtask_1_17.txt, subtask_1_18.txt, subtask_1_19.txt, subtask_1_20.txt, subtask_1_21.txt, subtask_1_22.txt, subtask_1_23.txt, subtask_1_24.txt, subtask_1_25.txt, subtask_1_26.txt, subtask_1_27.txt, subtask_1_28.txt, subtask_1_29.txt, subtask_1_30.txt, subtask_1_31.txt, subtask_1_32.txt, subtask_1_33.txt, subtask_1_34.txt, subtask_1_35.txt, subtask_1_36.txt, subtask_1_37.txt, subtask_1_38.txt, subtask_1_39.txt, subtask_1_40.txt, subtask_1_41.txt
Case Name Status Exec Time Memory
sample_01.txt AC 5 ms 768 KB
sample_02.txt AC 5 ms 768 KB
sample_03.txt AC 5 ms 768 KB
subtask_1_01.txt AC 5 ms 768 KB
subtask_1_02.txt AC 5 ms 768 KB
subtask_1_03.txt AC 5 ms 768 KB
subtask_1_04.txt AC 5 ms 768 KB
subtask_1_05.txt AC 5 ms 768 KB
subtask_1_06.txt AC 5 ms 768 KB
subtask_1_07.txt AC 5 ms 768 KB
subtask_1_08.txt AC 5 ms 768 KB
subtask_1_09.txt AC 68 ms 11008 KB
subtask_1_10.txt AC 135 ms 22272 KB
subtask_1_11.txt AC 36 ms 6272 KB
subtask_1_12.txt AC 1940 ms 57700 KB
subtask_1_13.txt AC 173 ms 23808 KB
subtask_1_14.txt AC 83 ms 11264 KB
subtask_1_15.txt AC 43 ms 5760 KB
subtask_1_16.txt AC 1931 ms 57700 KB
subtask_1_17.txt AC 117 ms 21760 KB
subtask_1_18.txt AC 123 ms 15616 KB
subtask_1_19.txt AC 124 ms 15360 KB
subtask_1_20.txt AC 1794 ms 57700 KB
subtask_1_21.txt AC 1753 ms 57700 KB
subtask_1_22.txt AC 1985 ms 57700 KB
subtask_1_23.txt AC 1846 ms 57700 KB
subtask_1_24.txt AC 5 ms 768 KB
subtask_1_25.txt AC 5 ms 768 KB
subtask_1_26.txt AC 5 ms 768 KB
subtask_1_27.txt AC 5 ms 768 KB
subtask_1_28.txt AC 231 ms 31104 KB
subtask_1_29.txt AC 228 ms 30976 KB
subtask_1_30.txt AC 1401 ms 52452 KB
subtask_1_31.txt AC 574 ms 52476 KB
subtask_1_32.txt AC 1698 ms 57724 KB
subtask_1_33.txt AC 1501 ms 54908 KB
subtask_1_34.txt AC 986 ms 52476 KB
subtask_1_35.txt AC 1393 ms 52604 KB
subtask_1_36.txt AC 1106 ms 52476 KB
subtask_1_37.txt AC 1545 ms 54396 KB
subtask_1_38.txt AC 1493 ms 53244 KB
subtask_1_39.txt AC 1534 ms 53116 KB
subtask_1_40.txt AC 1513 ms 53244 KB
subtask_1_41.txt AC 1031 ms 53372 KB