結果
| 問題 |
No.1165 Paint Squares
|
| ユーザー |
👑 |
| 提出日時 | 2021-08-10 14:44:10 |
| 言語 | Lua (LuaJit 2.1.1734355927) |
| 結果 |
AC
|
| 実行時間 | 2 ms / 2,000 ms |
| コード長 | 914 bytes |
| コンパイル時間 | 219 ms |
| コンパイル使用メモリ | 6,940 KB |
| 実行使用メモリ | 6,948 KB |
| 最終ジャッジ日時 | 2024-09-22 15:50:02 |
| 合計ジャッジ時間 | 1,029 ms |
|
ジャッジサーバーID (参考情報) |
judge5 / judge2 |
(要ログイン)
| ファイルパターン | 結果 |
|---|---|
| sample | AC * 2 |
| other | AC * 19 |
ソースコード
local mfl, mce = math.floor, math.ceil
local mod = 1000000007
local function bmul(x, y)
local x1, y1 = mfl(x / 31623), mfl(y / 31623)
local x0, y0 = x - x1 * 31623, y - y1 * 31623
return (x1 * y1 * 14122 + (x1 * y0 + x0 * y1) * 31623 + x0 * y0) % mod
end
local function badd(a, b) return (a + b) % mod 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
--[[
H = W + K
f(H, W) = 24 * g(H, W)
g(H, W) = 2^(H-3) + 2^(W-3) + g(H - 1, W - 1)
g(K, 0) = 2^K
g(H, W)
= 2^(H-3) + 2^(W-3) + 2^(H-4) + 2^(W-4) + ... + 2^(H-W) + 2^0 + 2^K
<2^K = 2^(H-W) = 2^(H-W-1) + 2^(H-W-2) + ... + 2^0 + 1>
= 2^(H-2) + 2^(W-2) - 1
]]
local h, w = io.read("*n", "*n")
local v = (modpow(2, h - 2) + modpow(2, w - 2) - 1 + mod) % mod
print(bmul(24, v))