結果
問題 | No.331 CodeRunnerでやれ |
ユーザー |
![]() |
提出日時 | 2015-12-24 01:03:44 |
言語 | Perl (5.40.0) |
結果 |
WA
|
実行時間 | - |
コード長 | 128 bytes |
コンパイル時間 | 117 ms |
コンパイル使用メモリ | 6,816 KB |
実行使用メモリ | 25,844 KB |
平均クエリ数 | 2.41 |
最終ジャッジ日時 | 2024-07-16 08:15:44 |
合計ジャッジ時間 | 4,400 ms |
ジャッジサーバーID (参考情報) |
judge3 / judge4 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | WA * 1 |
other | WA * 16 |
ソースコード
$|=1;sub o{print"@_\n"}--$d,o R;++$d,o L while<><1||$m{$y=($x+30**($d&=3))%901}&&$m{$y}^$d^6;$m{$x}=$d^4;$x=$y;o F;<>=~/M/||do$0