Submission #1314514

Source Code Expand

$/=$";print$-=(2-<>)*(<>-<>)+1

Submission Info

Submission Time
Task A - A+...+B Problem
User x20
Language Perl (v5.18.2)
Score 200
Code Size 30 Byte
Status AC
Exec Time 3 ms
Memory 640 KB

Compile Error

./Main.pl syntax OK

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 200 / 200
Status
AC × 4
AC × 12
Set Name Test Cases
Sample s1.txt, s2.txt, s3.txt, s4.txt
All 01.txt, 02.txt, 03.txt, 04.txt, 05.txt, 06.txt, 07.txt, 08.txt, s1.txt, s2.txt, s3.txt, s4.txt
Case Name Status Exec Time Memory
01.txt AC 3 ms 640 KB
02.txt AC 1 ms 384 KB
03.txt AC 1 ms 384 KB
04.txt AC 1 ms 384 KB
05.txt AC 2 ms 384 KB
06.txt AC 1 ms 384 KB
07.txt AC 1 ms 384 KB
08.txt AC 2 ms 384 KB
s1.txt AC 2 ms 384 KB
s2.txt AC 2 ms 384 KB
s3.txt AC 1 ms 384 KB
s4.txt AC 1 ms 384 KB