結果

問題 No.1049 Zero (Exhaust)
コンテスト
ユーザー obakyan
提出日時 2020-05-08 21:59:37
言語 Lua
(LuaJit 2.1.1734355927)
結果
AC  
実行時間 70 ms / 2,000 ms
コード長 540 bytes
コンパイル時間 176 ms
コンパイル使用メモリ 6,940 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-07-04 00:39:23
合計ジャッジ時間 1,735 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 22
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

local mod = 1000000007
local mfl = math.floor

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(x, y)
  return (x + y) % mod
end

local p, k = io.read("*n", "*n")
local dp1, dp2 = 1, 0
local dst1, dst2 = 0, 0
for i = 1, k do
  dst1 = badd(bmul(dp1, p + 1), bmul(dp2, 2))
  dst2 = badd(bmul(dp1, p - 1), bmul(2, bmul(dp2, p - 1)))
  dp1, dp2 = dst1, dst2
end
print(dp1)
0