Submission #2552771


Source Code Expand

<>=~/ .* /;print$`>$&?$&>$'?(1+($`-$&-1)/($&-$')|0)*2+1:-1:1

Submission Info

Submission Time
Task A - Kaiden
User kotatsugame
Language Perl (v5.18.2)
Score 100
Code Size 62 Byte
Status AC
Exec Time 2 ms
Memory 384 KB

Compile Error

./Main.pl syntax OK

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 100 / 100
Status
AC × 3
AC × 13
Set Name Test Cases
Sample a01, a02, a03
All a01, a02, a03, b04, b05, b06, b07, b08, b09, b10, b11, b12, b13
Case Name Status Exec Time Memory
a01 AC 2 ms 384 KB
a02 AC 2 ms 384 KB
a03 AC 2 ms 384 KB
b04 AC 2 ms 384 KB
b05 AC 2 ms 384 KB
b06 AC 2 ms 384 KB
b07 AC 2 ms 384 KB
b08 AC 2 ms 384 KB
b09 AC 2 ms 384 KB
b10 AC 2 ms 384 KB
b11 AC 2 ms 384 KB
b12 AC 2 ms 384 KB
b13 AC 2 ms 384 KB