Submission #1339891


Source Code Expand

<>;print+(@_=sort{$a-$b}glob<>)[-1]-"@_"

Submission Info

Submission Time
Task B - Traveling AtCoDeer Problem
User x20
Language Perl (v5.18.2)
Score 200
Code Size 40 Byte
Status AC
Exec Time 5 ms
Memory 768 KB

Compile Error

./Main.pl syntax OK

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 200 / 200
Status
AC × 2
AC × 6
Set Name Test Cases
Sample s1.txt, s2.txt
All in1.txt, in2.txt, in3.txt, in4.txt, s1.txt, s2.txt
Case Name Status Exec Time Memory
in1.txt AC 5 ms 768 KB
in2.txt AC 5 ms 768 KB
in3.txt AC 5 ms 768 KB
in4.txt AC 5 ms 768 KB
s1.txt AC 5 ms 768 KB
s2.txt AC 5 ms 768 KB