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 |
|
|
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 |