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 |
|
|
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 |