結果

問題 No.707 書道
ユーザー letrangerjpletrangerjp
提出日時 2018-06-29 22:37:26
言語 Ruby
(3.4.1)
結果
AC  
実行時間 187 ms / 2,000 ms
コード長 406 bytes
コンパイル時間 284 ms
コンパイル使用メモリ 7,424 KB
実行使用メモリ 12,544 KB
最終ジャッジ日時 2024-07-01 00:01:56
合計ジャッジ時間 1,796 ms
ジャッジサーバーID
（参考情報） 		judge2 / judge1
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 6
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff # 

H, W = gets.split.map &:to_i
$board = $<.map{|s|s.to_i(2)}

def f(a, b)
  (a**2 + b**2) ** 0.5
end

def g(yy, xx)
  sum = 0
  H.times{|y|
    W.times{|x|
      next if $board[y][x] != 1
      sum += f(xx - x, yy - y)
    }
  }
  sum
end

ans = 1.0/0
(0...H).each{|yy|
  [-1, W].each{|xx|
    ans = [ans, g(yy, xx)].min
  }
}
(0...W).each{|xx|
  [-1, H].each{|yy|
    ans = [ans, g(yy, xx)].min
  }
}
p ans
0