結果

問題 No.612 Move on grid
ユーザー 👑 obakyanobakyan
提出日時 2022-04-12 23:24:56
言語 Lua
(LuaJit 2.1.1696795921)
結果
AC  
実行時間 139 ms / 2,500 ms
コード長 1,084 bytes
コンパイル時間 93 ms
コンパイル使用メモリ 6,944 KB
実行使用メモリ 6,944 KB
最終ジャッジ日時 2024-06-01 06:36:02
合計ジャッジ時間 2,895 ms
ジャッジサーバーID
(参考情報)
judge3 / judge1
このコードへのチャレンジ
(要ログイン)

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 3 ms
6,816 KB
testcase_01 AC 4 ms
6,944 KB
testcase_02 AC 4 ms
6,940 KB
testcase_03 AC 38 ms
6,940 KB
testcase_04 AC 137 ms
6,940 KB
testcase_05 AC 139 ms
6,944 KB
testcase_06 AC 136 ms
6,940 KB
testcase_07 AC 137 ms
6,944 KB
testcase_08 AC 137 ms
6,940 KB
testcase_09 AC 137 ms
6,944 KB
testcase_10 AC 87 ms
6,940 KB
testcase_11 AC 43 ms
6,940 KB
testcase_12 AC 103 ms
6,940 KB
testcase_13 AC 60 ms
6,940 KB
testcase_14 AC 119 ms
6,944 KB
testcase_15 AC 45 ms
6,940 KB
testcase_16 AC 137 ms
6,944 KB
testcase_17 AC 62 ms
6,940 KB
testcase_18 AC 121 ms
6,944 KB
testcase_19 AC 95 ms
6,944 KB
testcase_20 AC 129 ms
6,944 KB
権限があれば一括ダウンロードができます

ソースコード

diff #

local mod = 1000000007
local function badd(x, y) return (x + y) % mod end
local dp1, dp2 = {}, {}
local offset = 10001
local lim = 20001
for i = 1, lim do
  dp1[i] = 0
end
dp1[offset] = 1
local n = io.read("*n")
local a, b, c = io.read("*n", "*n", "*n")
if a < 0 then a = -a end
if b < 0 then b = -b end
if c < 0 then c = -c end
local d, e = io.read("*n", "*n")
for i = 1, n do
  local src = i % 2 == 1 and dp1 or dp2
  local dst = i % 2 == 1 and dp2 or dp1
  for j = 1, lim do
    dst[j] = 0
  end
  for j = a + 1, lim do
    dst[j - a] = dst[j - a] + src[j]
  end
  for j = 1, lim - a do
    dst[j + a] = dst[j + a] + src[j]
  end
  for j = b + 1, lim do
    dst[j - b] = dst[j - b] + src[j]
  end
  for j = 1, lim - b do
    dst[j + b] = dst[j + b] + src[j]
  end
  for j = c + 1, lim do
    dst[j - c] = dst[j - c] + src[j]
  end
  for j = 1, lim - c do
    dst[j + c] = dst[j + c] + src[j]
  end
  for j = 1, lim do
    dst[j] = dst[j] % mod
  end
end
local ret = 0
local tbl = n % 2 == 1 and dp2 or dp1
for i = offset + d, offset + e do
  ret = badd(ret, tbl[i])
end
print(ret)
0