結果
問題 |
No.469 区間加算と一致検索の問題
|
ユーザー |
![]() |
提出日時 | 2016-12-19 06:42:01 |
言語 | Perl (5.40.0) |
結果 |
WA
|
実行時間 | - |
コード長 | 99 bytes |
コンパイル時間 | 316 ms |
コンパイル使用メモリ | 6,688 KB |
実行使用メモリ | 35,288 KB |
最終ジャッジ日時 | 2024-12-14 08:49:57 |
合計ジャッジ時間 | 6,682 ms |
ジャッジサーバーID (参考情報) |
judge4 / judge3 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 3 |
other | AC * 20 WA * 29 |
コンパイルメッセージ
Main.pl syntax OK
ソースコード
#!perl -nla sub F{$a[pop@F]||=0|rand 9e9}$a{$h}//=$.;$#F?$h+=pop(@F)*(F()-F):$.-1&&print$a{$h|=0}-2