結果

問題 No.623 fudan no modulus to tigau
ユーザー YosukeKawada
提出日時 2018-01-15 10:45:04
言語 Ruby
(3.4.1)
結果
AC  
実行時間 105 ms / 2,000 ms
コード長 725 bytes
コンパイル時間 144 ms
コンパイル使用メモリ 7,424 KB
実行使用メモリ 12,288 KB
最終ジャッジ日時 2024-12-24 02:34:46
合計ジャッジ時間 2,206 ms
ジャッジサーバーID
（参考情報） 		judge2 / judge1
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 2
other AC * 12
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #
プレゼンテーションモードにする

N = $stdin.gets.chomp.to_i
P = [[0,1,1],[0,1,1]] + (2..N).map{
  $stdin.gets.chomp.split(" ").map{ |a| a.to_i }
}
_ = $stdin.gets.chomp.to_i
Q = $stdin.gets.chomp.split(" ").map{ |a| a.to_i }
M = 998244353
$funcs = [
  lambda { |x,mem| 1 },
  lambda { |x,mem| x },
]
def ff(i,x,mem)
  if mem[i]
    return mem[i]
  end
  r = $funcs[i].call(x,mem)
  mem[i] = r
  r
end
(2..N).each { |i|
  t,a,b = *P[i]
  
  $funcs << case t
           when 1
             lambda{ |x,mem| (ff(a,x,mem) + ff(b,x,mem)) % M }
           when 2
             lambda{ |x,mem| (a * ff(b,x,mem)) % M }
           when 3
             lambda{ |x,mem| (ff(a,x,mem) * ff(b,x,mem)) % M }
           end
}
Q.each { |x|
  puts $funcs[-1].call(x,{})
}
הההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההה
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
0