結果
| 問題 |
No.370 道路の掃除
|
| コンテスト | |
| ユーザー |
|
| 提出日時 | 2016-05-13 22:33:17 |
| 言語 | Ruby (3.4.1) |
| 結果 |
RE
|
| 実行時間 | - |
| コード長 | 575 bytes |
| コンパイル時間 | 137 ms |
| コンパイル使用メモリ | 7,552 KB |
| 実行使用メモリ | 12,544 KB |
| 最終ジャッジ日時 | 2024-10-05 16:53:54 |
| 合計ジャッジ時間 | 3,562 ms |
|
ジャッジサーバーID (参考情報) |
judge5 / judge3 |
(要ログイン)
| ファイルパターン | 結果 |
|---|---|
| other | AC * 15 WA * 1 RE * 18 |
コンパイルメッセージ
Syntax OK
ソースコード
n,m=gets.chomp.split.map(&:to_i)
ds = m.times.map{ gets.to_i }
xs = ds.select{|x| x < 0 }.map{|x| -x}.sort
ys = ds.select{|x| x > 0 }.sort
if ds.select{|x| x == 0}.length > 0
n -= 1
end
ans = 1e10
if xs.size >= n
ans = [ans, xs[n-1]].min
end
if ys.size >= n
ans = [ans, ys[n-1]].min
end
for k in 0..xs.size do
if k < n
d = (k == 0 ? 0 : xs[k-1]) * 2 + (n==k ? 0 : ys[n-k-1])
ans = [ans, d].min
end
end
xs,ys = ys,xs
for k in 0..xs.size do
if k < n
d = (k == 0 ? 0 : xs[k-1]) * 2 + (n==k ? 0 : ys[n-k-1])
ans = [ans, d].min
end
end
p ans