Submission #1501304
Source Code Expand
$_=<>;print $_*800-int($_/15)*200;
Submission Info
Submission Time | |
---|---|
Task | A - Restaurant |
User | m_buyoh |
Language | Perl (v5.18.2) |
Score | 100 |
Code Size | 34 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 | 00_example_01.txt, 00_example_02.txt |
All | 00_example_01.txt, 00_example_02.txt, 01.txt, 02.txt, 03.txt, 04.txt, 05.txt, 06.txt |
Case Name | Status | Exec Time | Memory |
---|---|---|---|
00_example_01.txt | AC | 2 ms | 384 KB |
00_example_02.txt | AC | 1 ms | 384 KB |
01.txt | AC | 2 ms | 384 KB |
02.txt | AC | 2 ms | 384 KB |
03.txt | AC | 2 ms | 384 KB |
04.txt | AC | 2 ms | 384 KB |
05.txt | AC | 2 ms | 384 KB |
06.txt | AC | 2 ms | 384 KB |