結果
問題 | No.269 見栄っ張りの募金活動 |
ユーザー |
👑 |
提出日時 | 2019-11-10 16:39:37 |
言語 | Lua (LuaJit 2.1.1734355927) |
結果 |
TLE
(最新)
AC
(最初)
|
実行時間 | - |
コード長 | 1,202 bytes |
コンパイル時間 | 166 ms |
コンパイル使用メモリ | 5,248 KB |
実行使用メモリ | 5,376 KB |
最終ジャッジ日時 | 2024-09-15 05:00:14 |
合計ジャッジ時間 | 18,614 ms |
ジャッジサーバーID (参考情報) |
judge3 / judge4 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 3 |
other | AC * 21 TLE * 1 |
ソースコード
local mod = 1000000007local mfl = math.floorlocal function bmul(x, y)local x0, y0 = x % 31623, y % 31623local x1, y1 = mfl(x / 31623), mfl(y / 31623)return (x1 * y1 * 14122 + (x1 * y0 + x0 * y1) * 31623 + x0 * y0) % modendlocal function badd(x, y)return (x + y) % modendlocal function bsub(x, y)return x < y and x - y + mod or x - yendlocal function modpow(src, pow)local res = 1while 0 < pow doif pow % 2 == 1 thenres = bmul(res, src)pow = pow - 1endsrc = bmul(src, src)pow = mfl(pow / 2)endreturn resendlocal n, s, k = io.read("*n", "*n", "*n")local lowlim = mfl(k * n * (n - 1) / 2)if s < lowlim thenprint(0)elseif s == lowlim thenprint(1)elses = s - lowlimlocal dp = {}for i = 1, s do dp[i] = 0 endfor i = 1, n dolocal mul = n + 1 - ifor p = s - mul, 1, -1 dolocal cntlim = mfl((s - p) / mul)for j = cntlim, 1, -1 dolocal v = j * muldp[p + v] = badd(dp[p + v], dp[p])endenddolocal cntlim = mfl(s / mul)for j = cntlim, 1, -1 dolocal v = j * muldp[v] = badd(dp[v], 1)endendendprint(dp[s])end