結果

問題 No.2409 Strange Werewolves
ユーザー tomeruntomerun
提出日時 2023-08-11 21:32:47
言語 Crystal
(1.11.2)
結果
AC  
実行時間 20 ms / 2,000 ms
コード長 655 bytes
コンパイル時間 13,559 ms
コンパイル使用メモリ 294,520 KB
実行使用メモリ 13,952 KB
最終ジャッジ日時 2024-04-29 12:22:52
合計ジャッジ時間 14,495 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge5
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 18 ms
13,952 KB
testcase_01 AC 19 ms
13,824 KB
testcase_02 AC 19 ms
13,824 KB
testcase_03 AC 19 ms
13,824 KB
testcase_04 AC 19 ms
13,952 KB
testcase_05 AC 19 ms
13,824 KB
testcase_06 AC 18 ms
13,824 KB
testcase_07 AC 19 ms
13,824 KB
testcase_08 AC 19 ms
13,824 KB
testcase_09 AC 19 ms
13,824 KB
testcase_10 AC 20 ms
13,824 KB
testcase_11 AC 20 ms
13,824 KB
testcase_12 AC 20 ms
13,824 KB
testcase_13 AC 20 ms
13,824 KB
testcase_14 AC 20 ms
13,824 KB
testcase_15 AC 20 ms
13,952 KB
testcase_16 AC 20 ms
13,824 KB
testcase_17 AC 20 ms
13,824 KB
権限があれば一括ダウンロードができます

ソースコード

diff # 

MOD  = 998244353i64
FACT = [1i64]
600010.times do |i|
  FACT << FACT[i] * (i + 1) % MOD
end
FACT_INV = Array.new(FACT.size, 0i64)
FACT_INV[-1] = inv(FACT[-1])
(FACT_INV.size - 2).downto(0) do |i|
  FACT_INV[i] = FACT_INV[i + 1] * (i + 1) % MOD
end

def binom(n, k)
  FACT[n] * FACT_INV[k] % MOD * FACT_INV[n - k] % MOD
end

def inv(v)
  pow(v, MOD - 2)
end

def pow(v, p)
  ret = 1i64
  while p > 0
    if (p & 1i64) != 0
      ret *= v
      ret %= MOD
    end
    v *= v
    v %= MOD
    p >>= 1
  end
  ret
end

x, y, z, w = read_line.split.map(&.to_i64)
if w == 0
  x, y = y, x
  z, w = w, z
end
puts binom(y, w) * x % MOD * FACT[y - w + x - 1] % MOD
0