結果
問題 |
No.533 Mysterious Stairs
|
ユーザー |
![]() |
提出日時 | 2017-06-24 01:34:03 |
言語 | Perl (5.40.0) |
結果 |
RE
|
実行時間 | - |
コード長 | 131 bytes |
コンパイル時間 | 364 ms |
コンパイル使用メモリ | 6,944 KB |
実行使用メモリ | 102,656 KB |
最終ジャッジ日時 | 2024-10-04 05:11:22 |
合計ジャッジ時間 | 9,383 ms |
ジャッジサーバーID (参考情報) |
judge3 / judge1 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
other | AC * 26 RE * 2 |
コンパイルメッセージ
Main.pl syntax OK
ソースコード
@1=($2[2]=1)x2;for$i(3..($n=<>)){($$_[$i]=${$_%3+1}[$i-$_]+${($_+1)%3+1}[$i-$_])%=$%=1e9+7for 1..3};print+($1[$n]+$2[$n]+$3[$n])%$%