Submission #3932130

Source Code Expand

($\*=($p=$%)<($%=abs($c+=2*/a/-1))||$p)%=1e9+7for sort{$a-$b}map(<>.a,++$\..<>),<>;print

Submission Info

Submission Time
Task A - 1D Matching
User kotatsugame
Language Perl (v5.18.2)
Score 500
Code Size 88 Byte
Status AC
Exec Time 656 ms
Memory 37248 KB

Compile Error

Unquoted string "a" may clash with future reserved word at ./Main.pl line 1.
Name "main::c" 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 500 / 500
Status
AC × 2
AC × 14
Set Name Test Cases
Sample example0.txt, example1.txt
All 000.txt, 001.txt, 002.txt, 003.txt, 004.txt, 005.txt, 006.txt, 007.txt, 008.txt, 009.txt, 010.txt, 011.txt, example0.txt, example1.txt
Case Name Status Exec Time Memory
000.txt AC 364 ms 22784 KB
001.txt AC 119 ms 8448 KB
002.txt AC 169 ms 11648 KB
003.txt AC 191 ms 13056 KB
004.txt AC 568 ms 33280 KB
005.txt AC 656 ms 37248 KB
006.txt AC 634 ms 37248 KB
007.txt AC 631 ms 37248 KB
008.txt AC 638 ms 37248 KB
009.txt AC 638 ms 37248 KB
010.txt AC 557 ms 34176 KB
011.txt AC 616 ms 37248 KB
example0.txt AC 2 ms 384 KB
example1.txt AC 2 ms 384 KB