結果

問題 No.707 書道
ユーザー letrangerjp
提出日時 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
הההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההה
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
0