結果

問題 No.402 最も海から遠い場所
ユーザー 👑 obakyan
提出日時 2019-07-19 23:18:49
言語 Lua
(LuaJit 2.1.1734355927)
結果
AC  
実行時間 1,989 ms / 3,000 ms
コード長 1,856 bytes
コンパイル時間 582 ms
コンパイル使用メモリ 5,504 KB
実行使用メモリ 403,968 KB
最終ジャッジ日時 2024-12-26 04:04:12
合計ジャッジ時間 9,315 ms
ジャッジサーバーID
(参考情報)
judge2 / judge4
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 3
other AC * 19
権限があれば一括ダウンロードができます

ソースコード

diff #
プレゼンテーションモードにする

local ior = io.input()
local h, w = ior:read("*n", "*n", "*l")
local function getindex(i_h, i_w)
return i_w + (i_h - 1) * w
end
local taskstate = {}
for i = 1, h * w do taskstate[i] = false end
local tasks = {}
local tasknum = 0
local done = 0
local tasklim = h * w
local function addtask(idx)
if(not taskstate[idx]) then
taskstate[idx] = true
tasknum = tasknum + 1
local taskidx = tasknum % tasklim
if taskidx == 0 then taskidx = tasklim end
tasks[taskidx] = idx
end
end
local function createMap()
local str = ""
local map = {}
local inf = h + w
for i_h = 1, h do
str = ior:read()
for i_w = 1, w do
local index = getindex(i_h, i_w)
if str:sub(i_w, i_w) == "#" then
if i_h == 1 or i_h == h or i_w == 1 or i_w == w then
map[index] = 1
addtask(index)
else
map[index] = inf
end
else
map[index] = 0
addtask(index)
end
end
end
return map
end
local map = createMap()
local function walk(src, dst)
if map[src] + 1 < map[dst] then
map[dst] = map[src] + 1
addtask(dst)
end
end
while(done < tasknum) do
done = done + 1
local taskidx = done % tasklim
if(taskidx == 0) then taskidx = tasklim end
local idx = tasks[taskidx]
taskstate[idx] = false
if w < idx then walk(idx, idx - w) end
if idx <= (h - 1) * w then walk(idx, idx + w) end
if 1 < w then
if idx % w ~= 0 then
walk(idx, idx + 1)
if w < idx then walk(idx, idx + 1 - w) end
if idx <= (h - 1) * w then walk(idx, idx + 1 + w) end
end
if idx % w ~= 1 then
walk(idx, idx - 1)
if w < idx then walk(idx, idx - 1 - w) end
if idx <= (h - 1) * w then walk(idx, idx - 1 + w) end
end
end
end
local mma = math.max
local ret = 1
for i = 1, h * w do
ret = mma(ret, map[i])
end
print(ret)
הההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההה
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
0