Submission #4118485

Source Code Expand

<>=~$";@q=((0)x($'-2),$s=1);map{push@q,$t;$s=(($t+=$s)%=$%=1e9+7)-shift@q}2..$`;print$s%$%,$/

Submission Info

Submission Time
Task F - 準急
User x20
Language Perl (v5.18.2)
Score 4
Code Size 93 Byte
Status AC
Exec Time 566 ms
Memory 80640 KB

Compile Error

./Main.pl syntax OK

Judge Result

Set Name All
Score / Max Score 4 / 4
Status
AC × 7
Set Name Test Cases
All 00, 01, 02, 03, 04, 90, 91
Case Name Status Exec Time Memory
00 AC 547 ms 48256 KB
01 AC 566 ms 80640 KB
02 AC 267 ms 24064 KB
03 AC 176 ms 15872 KB
04 AC 533 ms 44032 KB
90 AC 2 ms 384 KB
91 AC 2 ms 384 KB