結果
| 問題 | 
                            No.157 2つの空洞
                             | 
                    
| コンテスト | |
| ユーザー | 
                             | 
                    
| 提出日時 | 2015-03-02 11:23:06 | 
| 言語 | Ruby  (3.4.1)  | 
                    
| 結果 | 
                             
                                TLE
                                 
                             
                            
                         | 
                    
| 実行時間 | - | 
| コード長 | 1,458 bytes | 
| コンパイル時間 | 47 ms | 
| コンパイル使用メモリ | 7,552 KB | 
| 実行使用メモリ | 108,956 KB | 
| 最終ジャッジ日時 | 2024-06-24 01:08:13 | 
| 合計ジャッジ時間 | 5,409 ms | 
| 
                            ジャッジサーバーID (参考情報)  | 
                        judge5 / judge2 | 
(要ログイン)
| ファイルパターン | 結果 | 
|---|---|
| sample | AC * 4 | 
| other | AC * 13 TLE * 1 -- * 2 | 
コンパイルメッセージ
Syntax OK
ソースコード
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
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 == "."
        q = [[i,j]]
        while q.size > 0
            sy, sx = q.shift
            c[sy][sx] = "a"
            $m.push([sy,sx])
            for i in 0..3
                cy = sy + $dy[i]
                cx = sx + $dx[i]
                if c[cy][cx]=="." && cy.between?(0,h-1) && cx.between?(0,w-1)
                    q.push([cy,cx])
                end
            end
        end
        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 == "."
        q = [[i,j]]
        while q.size > 0
            sy, sx = q.shift
            c[sy][sx] = "b"
            $mm.push([sy,sx])
            for i in 0..3
                cy = sy + $dy[i]
                cx = sx + $dx[i]
                if c[cy][cx]=="." && cy.between?(0,h-1) && cx.between?(0,w-1)
                    q.push([cy,cx])
                end
            end
        end
        bl = true
        break
    end
    break if bl
end
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