Submission #1558550


Source Code Expand

<>;++$i,$f?$f=0:$_==$i?$f=++$%:0for glob<>;
print$%,$/

Submission Info

Submission Time
Task D - Derangement
User x20
Language Perl (v5.18.2)
Score 400
Code Size 57 Byte
Status AC
Exec Time 308 ms
Memory 21120 KB

Compile Error

./Main.pl syntax OK

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 400 / 400
Status
AC × 4
AC × 15
Set Name Test Cases
Sample 0_000.txt, 0_001.txt, 0_002.txt, 0_003.txt
All 0_000.txt, 0_001.txt, 0_002.txt, 0_003.txt, 1_004.txt, 1_005.txt, 1_006.txt, 1_007.txt, 1_008.txt, 1_009.txt, 1_010.txt, 1_011.txt, 1_012.txt, 1_013.txt, 1_014.txt
Case Name Status Exec Time Memory
0_000.txt AC 5 ms 768 KB
0_001.txt AC 5 ms 768 KB
0_002.txt AC 5 ms 768 KB
0_003.txt AC 5 ms 768 KB
1_004.txt AC 5 ms 768 KB
1_005.txt AC 289 ms 19840 KB
1_006.txt AC 303 ms 19840 KB
1_007.txt AC 282 ms 21120 KB
1_008.txt AC 291 ms 19840 KB
1_009.txt AC 308 ms 19840 KB
1_010.txt AC 282 ms 20992 KB
1_011.txt AC 287 ms 19840 KB
1_012.txt AC 301 ms 19968 KB
1_013.txt AC 308 ms 20224 KB
1_014.txt AC 281 ms 21120 KB