Submission #948449


Source Code Expand

print$-=-<>-1+${map$x+=$-=$_-$x,glob<>;x}*2

Submission Info

Submission Time
Task B - K Cakes
User x20
Language Perl (v5.18.2)
Score 200
Code Size 43 Byte
Status AC
Exec Time 8 ms
Memory 768 KB

Compile Error

Unquoted string "x" may clash with future reserved word at ./Main.pl line 1.
./Main.pl syntax OK

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 200 / 200
Status
AC × 3
AC × 10
Set Name Test Cases
Sample 0_000.txt, 0_001.txt, 0_002.txt
All 0_000.txt, 0_001.txt, 0_002.txt, 1_003.txt, 1_004.txt, 1_005.txt, 1_006.txt, 1_007.txt, 1_008.txt, 1_009.txt
Case Name Status Exec Time Memory
0_000.txt AC 7 ms 768 KB
0_001.txt AC 7 ms 768 KB
0_002.txt AC 7 ms 768 KB
1_003.txt AC 8 ms 768 KB
1_004.txt AC 7 ms 768 KB
1_005.txt AC 7 ms 768 KB
1_006.txt AC 7 ms 768 KB
1_007.txt AC 8 ms 768 KB
1_008.txt AC 7 ms 768 KB
1_009.txt AC 7 ms 768 KB