Submission #849203

Source Code Expand

<>;/\n/,$x+=$'+$i++&1for sort{$a-$b}map$_.=$%++,<>;print$x/2

Submission Info

Submission Time
Task C - BBuBBBlesort!
User x20
Language Perl (v5.18.2)
Score 600
Code Size 60 Byte
Status AC
Exec Time 539 ms
Memory 23936 KB

Compile Error

Name "main::i" 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 600 / 600
Status
AC × 2
AC × 24
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, 17.txt, 18.txt, 19.txt, 20.txt, 21.txt, 22.txt, s1.txt, s2.txt
Case Name Status Exec Time Memory
01.txt AC 539 ms 23936 KB
02.txt AC 509 ms 23936 KB
03.txt AC 505 ms 23936 KB
04.txt AC 486 ms 23936 KB
05.txt AC 509 ms 23936 KB
06.txt AC 516 ms 23936 KB
07.txt AC 520 ms 23936 KB
08.txt AC 291 ms 23168 KB
09.txt AC 286 ms 23168 KB
10.txt AC 318 ms 23168 KB
11.txt AC 315 ms 23168 KB
12.txt AC 321 ms 23936 KB
13.txt AC 326 ms 23936 KB
14.txt AC 521 ms 23936 KB
15.txt AC 507 ms 23936 KB
16.txt AC 516 ms 23936 KB
17.txt AC 506 ms 23936 KB
18.txt AC 6 ms 384 KB
19.txt AC 6 ms 512 KB
20.txt AC 6 ms 512 KB
21.txt AC 6 ms 384 KB
22.txt AC 6 ms 512 KB
s1.txt AC 6 ms 384 KB
s2.txt AC 6 ms 384 KB