Submission #1225301


Source Code Expand

<>;map{$a.=$k>$_?G:$k<$_?L:'';$k=$_}glob<>;print$a=~s/.G+|.L*//g

Submission Info

Submission Time
Task A - Sorted Arrays
User akouryy
Language Perl (v5.18.2)
Score 300
Code Size 64 Byte
Status AC
Exec Time 277 ms
Memory 22400 KB

Compile Error

./Main.pl syntax OK

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 300 / 300
Status
AC × 3
AC × 17
Set Name Test Cases
Sample sample_01.txt, sample_02.txt, sample_03.txt
All sample_01.txt, sample_02.txt, sample_03.txt, sample_01.txt, sample_02.txt, sample_03.txt, subtask_1_01.txt, subtask_1_02.txt, subtask_1_03.txt, subtask_1_04.txt, subtask_1_05.txt, subtask_1_06.txt, subtask_1_07.txt, subtask_1_08.txt, subtask_1_09.txt, subtask_1_10.txt, subtask_1_11.txt
Case Name Status Exec Time Memory
sample_01.txt AC 5 ms 768 KB
sample_02.txt AC 5 ms 768 KB
sample_03.txt AC 5 ms 768 KB
subtask_1_01.txt AC 173 ms 13824 KB
subtask_1_02.txt AC 132 ms 11136 KB
subtask_1_03.txt AC 82 ms 7168 KB
subtask_1_04.txt AC 276 ms 22400 KB
subtask_1_05.txt AC 270 ms 22400 KB
subtask_1_06.txt AC 277 ms 22400 KB
subtask_1_07.txt AC 154 ms 22400 KB
subtask_1_08.txt AC 141 ms 22272 KB
subtask_1_09.txt AC 152 ms 22400 KB
subtask_1_10.txt AC 5 ms 768 KB
subtask_1_11.txt AC 5 ms 768 KB