結果
問題 | No.895 MESE |
ユーザー | obakyan |
提出日時 | 2020-03-31 10:44:36 |
言語 | Lua (LuaJit 2.1.1696795921) |
結果 |
AC
|
実行時間 | 273 ms / 2,000 ms |
コード長 | 1,238 bytes |
コンパイル時間 | 28 ms |
コンパイル使用メモリ | 6,688 KB |
実行使用メモリ | 6,944 KB |
最終ジャッジ日時 | 2024-06-24 01:11:56 |
合計ジャッジ時間 | 5,038 ms |
ジャッジサーバーID (参考情報) |
judge2 / judge4 |
(要ログイン)
テストケース
テストケース表示入力 | 結果 | 実行時間 実行使用メモリ |
---|---|---|
testcase_00 | AC | 16 ms
6,816 KB |
testcase_01 | AC | 16 ms
6,944 KB |
testcase_02 | AC | 17 ms
6,940 KB |
testcase_03 | AC | 16 ms
6,944 KB |
testcase_04 | AC | 15 ms
6,944 KB |
testcase_05 | AC | 15 ms
6,944 KB |
testcase_06 | AC | 16 ms
6,940 KB |
testcase_07 | AC | 15 ms
6,940 KB |
testcase_08 | AC | 17 ms
6,940 KB |
testcase_09 | AC | 18 ms
6,940 KB |
testcase_10 | AC | 18 ms
6,944 KB |
testcase_11 | AC | 18 ms
6,940 KB |
testcase_12 | AC | 17 ms
6,940 KB |
testcase_13 | AC | 99 ms
6,940 KB |
testcase_14 | AC | 233 ms
6,944 KB |
testcase_15 | AC | 247 ms
6,940 KB |
testcase_16 | AC | 155 ms
6,940 KB |
testcase_17 | AC | 38 ms
6,944 KB |
testcase_18 | AC | 272 ms
6,944 KB |
testcase_19 | AC | 273 ms
6,940 KB |
testcase_20 | AC | 272 ms
6,940 KB |
testcase_21 | AC | 273 ms
6,944 KB |
testcase_22 | AC | 271 ms
6,944 KB |
testcase_23 | AC | 273 ms
6,944 KB |
testcase_24 | AC | 273 ms
6,944 KB |
testcase_25 | AC | 272 ms
6,944 KB |
testcase_26 | AC | 270 ms
6,944 KB |
testcase_27 | AC | 272 ms
6,940 KB |
testcase_28 | AC | 273 ms
6,940 KB |
ソースコード
local mod = 1000000007 local mfl = math.floor local function bmul(x, y) local x0, y0 = x % 31623, y % 31623 local x1, y1 = mfl(x / 31623), mfl(y / 31623) return (x1 * y1 * 14122 + (x1 * y0 + x0 * y1) * 31623 + x0 * y0) % mod end local function badd(x, y) return (x + y) % mod end local function bsub(x, y) return x < y and x - y + mod or x - y end local function modpow(src, pow) local res = 1 while 0 < pow do if pow % 2 == 1 then res = bmul(res, src) pow = pow - 1 end src = bmul(src, src) pow = mfl(pow / 2) end return res end local function modinv(src) return modpow(src, mod - 2) end local fact = {1} for i = 2, 300000 do fact[i] = bmul(i, fact[i - 1]) end local function getComb(n, k) if k == 0 or k == n then return 1 end return bmul(fact[n], modinv(bmul(fact[k], fact[n - k]))) end local ret = 0 local a, b, c = io.read("*n", "*n", "*n") local n = a + b + c for alen = 1, a do local remdigits = n - alen - 1 local rema = a - alen local remb = b - 1 -- 1 + 2 + 4 + ... + 2^(dig - 1) local mul = bsub(modpow(2, remdigits), 1) mul = bmul(mul, getComb(remdigits - 1, rema)) mul = bmul(mul, getComb(remb + c - 1, c - 1)) ret = badd(ret, mul) end print(ret)