Submission #1914056
Source Code Expand
($\*=$p<($%=abs($c+=2*/\n/-1))||$p)%=1e9+7,$p=$%for sort{$a-$b}map(<>+0,++$\..<>),<>;print
Submission Info
Submission Time | |
---|---|
Task | A - 1D Matching |
User | x20 |
Language | Perl (v5.18.2) |
Score | 500 |
Code Size | 90 Byte |
Status | AC |
Exec Time | 501 ms |
Memory | 27108 KB |
Compile Error
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 |
|
|
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 | 298 ms | 16588 KB |
001.txt | AC | 101 ms | 6312 KB |
002.txt | AC | 137 ms | 8608 KB |
003.txt | AC | 152 ms | 9576 KB |
004.txt | AC | 422 ms | 24204 KB |
005.txt | AC | 477 ms | 27108 KB |
006.txt | AC | 501 ms | 27108 KB |
007.txt | AC | 481 ms | 27108 KB |
008.txt | AC | 481 ms | 27108 KB |
009.txt | AC | 479 ms | 27108 KB |
010.txt | AC | 453 ms | 27108 KB |
011.txt | AC | 479 ms | 27108 KB |
example0.txt | AC | 2 ms | 384 KB |
example1.txt | AC | 2 ms | 384 KB |