Submission #1073565


Source Code Expand

$N=<>;
/ /,$%+=($'-($`+$%)%$')%$' for reverse<>;
print$%,$/

Submission Info

Submission Time
Task A - Multiple Array
User x20
Language Perl (v5.18.2)
Score 300
Code Size 61 Byte
Status AC
Exec Time 146 ms
Memory 15232 KB

Compile Error

Name "main::N" used only once: possible typo at ./Main.pl line 1.
./Main.pl syntax OK

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 300 / 300
Status
AC × 2
AC × 18
Set Name Test Cases
Sample s1.txt, s2.txt
All 01.txt, 02.txt, 03.txt, 04.txt, 05.txt, 06.txt, 07.txt, 08.txt, 09.txt, 10.txt, 11.txt, 12.txt, 13.txt, 14.txt, 15.txt, 16.txt, s1.txt, s2.txt
Case Name Status Exec Time Memory
01.txt AC 144 ms 15232 KB
02.txt AC 144 ms 15232 KB
03.txt AC 144 ms 15232 KB
04.txt AC 144 ms 15232 KB
05.txt AC 145 ms 15232 KB
06.txt AC 142 ms 15232 KB
07.txt AC 140 ms 15232 KB
08.txt AC 146 ms 15232 KB
09.txt AC 143 ms 15232 KB
10.txt AC 142 ms 15232 KB
11.txt AC 136 ms 15232 KB
12.txt AC 133 ms 15232 KB
13.txt AC 137 ms 15232 KB
14.txt AC 142 ms 15232 KB
15.txt AC 4 ms 384 KB
16.txt AC 4 ms 384 KB
s1.txt AC 4 ms 384 KB
s2.txt AC 4 ms 384 KB