結果

問題 No.157 2つの空洞
ユーザー takuktakuk
提出日時 2015-03-02 11:08:47
言語 Ruby
(3.3.0)
結果
TLE  
実行時間 -
コード長 1,161 bytes
コンパイル時間 424 ms
コンパイル使用メモリ 11,196 KB
実行使用メモリ 85,632 KB
最終ジャッジ日時 2023-09-06 06:24:42
合計ジャッジ時間 5,764 ms
ジャッジサーバーID
(参考情報)
judge13 / judge11
このコードへのチャレンジ
(要ログイン)

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 78 ms
19,504 KB
testcase_01 AC 80 ms
15,156 KB
testcase_02 AC 79 ms
15,356 KB
testcase_03 AC 80 ms
15,092 KB
testcase_04 AC 81 ms
15,288 KB
testcase_05 AC 78 ms
15,156 KB
testcase_06 AC 78 ms
15,256 KB
testcase_07 AC 78 ms
15,152 KB
testcase_08 AC 79 ms
15,328 KB
testcase_09 AC 80 ms
15,136 KB
testcase_10 AC 80 ms
15,344 KB
testcase_11 AC 81 ms
15,056 KB
testcase_12 AC 79 ms
15,116 KB
testcase_13 AC 79 ms
15,148 KB
testcase_14 AC 100 ms
15,464 KB
testcase_15 AC 94 ms
15,296 KB
testcase_16 AC 82 ms
15,168 KB
testcase_17 TLE -
testcase_18 -- -
testcase_19 -- -
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #

def pp(c)
    c.each do |l|
        puts l
    end
    puts
end
$dx = [0,1,0,-1]
$dy = [1,0,-1,0]
$m = Array.new
$mm = Array.new
def fill(c,i,j,ch,h,w)
    q = [[i,j]]
    while q.size > 0
        sy, sx = q.shift
        c[sy][sx] = ch
        $m.push([sy,sx]) if ch == "a"
        $mm.push([sy,sx]) if ch == "b"
        for i in 0..3
            cy = sy + $dy[i]
            cx = sx + $dx[i]
            if cy.between?(0,h-1) && cx.between?(0,w-1) && c[cy][cx]=="."
                q.push([cy,cx])
            end
        end
    end
end

w, h = gets.split.map(&:to_i)
c = h.times.map{gets.chomp}
bl = false
c.each_with_index do |line,i|
    line.each_char.with_index do |cc,j|
        next unless cc == "."
        fill(c,i,j,"a",h,w)
        bl = true
        break
    end
    break if bl
end
bl = false
c.each_with_index do |line,i|
    line.each_char.with_index do |cc,j|
        next unless cc == "."
        fill(c,i,j,"b",h,w)
        bl = true
        break
    end
    break if bl
end
#pp c
ret = Float::INFINITY
$m.each do |p|
    $mm.each do |pp|
        t = (p[0] - pp[0]).abs + (p[1] - pp[1]).abs - 1
        ret = t if t < ret
    end
end
p ret
0