Submission #858073
Source Code Expand
@@=!<>;//,map$@[$_+$']=$_+$',@@for glob<>;print grep($_>0,@@)+1,$/
Submission Info
Submission Time | |
---|---|
Task | A - コンテスト |
User | x20 |
Language | Perl (5.14.2) |
Score | 2 |
Code Size | 66 Byte |
Status | AC |
Exec Time | 220 ms |
Memory | 2952 KB |
Compile Error
./Main.pl syntax OK
Judge Result
Set Name | All | ||
---|---|---|---|
Score / Max Score | 2 / 2 | ||
Status |
|
Set Name | Test Cases |
---|---|
All | 00, 01, 02, 90, 91 |
Case Name | Status | Exec Time | Memory |
---|---|---|---|
00 | AC | 70 ms | 2464 KB |
01 | AC | 100 ms | 2696 KB |
02 | AC | 220 ms | 2952 KB |
90 | AC | 52 ms | 2592 KB |
91 | AC | 52 ms | 2440 KB |