結果

問題 No.1949 足し算するだけのパズルゲーム(2)
ユーザー 👑 obakyanobakyan
提出日時 2022-05-29 00:03:01
言語 Lua
(LuaJit 2.1.1696795921)
結果
AC  
実行時間 226 ms / 3,000 ms
コード長 2,412 bytes
コンパイル時間 49 ms
コンパイル使用メモリ 5,152 KB
実行使用メモリ 8,372 KB
最終ジャッジ日時 2023-10-20 23:37:21
合計ジャッジ時間 4,227 ms
ジャッジサーバーID
（参考情報） 		judge12 / judge15
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 1 ms
4,348 KB
testcase_01 AC 1 ms
4,348 KB
testcase_02 AC 2 ms
4,348 KB
testcase_03 AC 2 ms
4,348 KB
testcase_04 AC 1 ms
4,348 KB
testcase_05 AC 2 ms
4,348 KB
testcase_06 AC 1 ms
4,348 KB
testcase_07 AC 125 ms
7,000 KB
testcase_08 AC 69 ms
6,996 KB
testcase_09 AC 140 ms
7,724 KB
testcase_10 AC 135 ms
7,724 KB
testcase_11 AC 95 ms
7,500 KB
testcase_12 AC 91 ms
7,768 KB
testcase_13 AC 93 ms
8,156 KB
testcase_14 AC 96 ms
8,072 KB
testcase_15 AC 94 ms
8,072 KB
testcase_16 AC 58 ms
6,996 KB
testcase_17 AC 226 ms
8,104 KB
testcase_18 AC 57 ms
6,996 KB
testcase_19 AC 1 ms
4,348 KB
testcase_20 AC 2 ms
4,348 KB
testcase_21 AC 3 ms
4,348 KB
testcase_22 AC 167 ms
8,372 KB
testcase_23 AC 2 ms
4,348 KB
testcase_24 AC 72 ms
7,596 KB
testcase_25 AC 151 ms
7,000 KB
権限があれば一括ダウンロードができます

ソースコード

diff # 

local mfl, mce = math.floor, math.ceil
local bls, brs = bit.lshift, bit.rshift
local Heapq = {}
Heapq.create = function(self, lt)
  self.lt = lt
  self.cnt = 0
  self.t = {}
end
Heapq.empty = function(self)
  return self.cnt == 0
end

Heapq.push = function(self, v)
  local hqlt = self.lt
  local hqt = self.t
  local c = self.cnt + 1
  self.cnt = c
  hqt[c] = v
  while 1 < c do
    local p = brs(c, 1)
    if hqlt(hqt[c], hqt[p]) then
      hqt[c], hqt[p] = hqt[p], hqt[c]
      c = p
    else
      break
    end
  end
end

Heapq.pop = function(self)
  local hqlt = self.lt
  local hqt = self.t
  local ret = hqt[1]
  local c = self.cnt
  hqt[1] = hqt[c]
  c = c - 1
  self.cnt = c
  local p = 1
  while true do
    local d1, d2 = p * 2, p * 2 + 1
    if c < d1 then break
    elseif c < d2 then
      if hqlt(hqt[d1], hqt[p]) then
        hqt[d1], hqt[p] = hqt[p], hqt[d1]
      end
      break
    else
      if hqlt(hqt[d1], hqt[d2]) then
        if hqlt(hqt[d1], hqt[p]) then
          hqt[d1], hqt[p] = hqt[p], hqt[d1]
          p = d1
        else break
        end
      else
        if hqlt(hqt[d2], hqt[p]) then
          hqt[d2], hqt[p] = hqt[p], hqt[d2]
          p = d2
        else break
        end
      end
    end
  end
  return ret
end

Heapq.new = function(lt)
  local obj = {}
  setmetatable(obj, {__index = Heapq})
  obj:create(lt)
  return obj
end


local h, w = io.read("*n", "*n")
local sr, sc = io.read("*n", "*n")
local added = {}
local a = {}
local v = 0
for i = 1, h do
  for j = 1, w do
    local idx = (i - 1) * w + j
    a[idx] = io.read("*n")
    added[idx] = false
    if i == sr and j == sc then
      v = a[idx]
      added[idx] = true
    end
  end
end

local hq = Heapq.new(function(x, y) return a[x] < a[y] end)
local function walk(src)
  local row = mce(src / w)
  local col = src - (row - 1) * w
  if 1 < row and not added[src - w] then
    added[src - w] = true
    hq:push(src - w)
  end
  if row < h and not added[src + w] then
    added[src + w] = true
    hq:push(src + w)
  end
  if 1 < col and not added[src - 1] then
    added[src - 1] = true
    hq:push(src - 1)
  end
  if col < w and not added[src + 1] then
    added[src + 1] = true
    hq:push(src + 1)
  end
end
walk((sr - 1) * w + sc)
while not hq:empty() do
  local idx = hq:pop()
  -- print(v, a[idx])
  if v <= a[idx] then
    print("No") os.exit()
  end
  walk(idx)
  v = v + a[idx]
end
print("Yes")
0