結果

問題 No.1265 Balloon Survival
コンテスト
ユーザー tamura2004
提出日時 2021-01-23 18:12:21
言語 Crystal
(1.19.1)
コンパイル:
crystal build -Donline_judge -o a.out --release --no-debug _filename_
実行:
./a.out
結果
AC  
実行時間 77 ms / 2,000 ms
コード長 818 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 9,632 ms
コンパイル使用メモリ 340,324 KB
実行使用メモリ 35,016 KB
最終ジャッジ日時 2026-03-21 08:42:06
合計ジャッジ時間 11,745 ms
ジャッジサーバーID
（参考情報） 		judge2_1 / judge1_0
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 4
other AC * 32
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

# 2点間の距離と点番号を求めて、距離の小さい順にソート
# 小さい順に取り出す
# 既に破裂した点が含まれている→何もしない
# 1番の点が含まれている->相手の点を破裂扱いにし、取り除く点に＋１
# それ以外→両方の点を破裂扱いにする

n = gets.to_s.to_i
xy = Array.new(n){ gets.to_s.split.map { |v| v.to_i64 - 1} }

dists = [] of Tuple(Int64,Int32,Int32)
n.times do |i|
  n.times do |j|
    next unless i < j
    xi,yi = xy[i]
    xj,yj = xy[j]
    dist = (yi - yj) ** 2 + (xi - xj) ** 2
    dists << {dist, i, j}
  end
end

bang = Array.new(n, false)
ans = 0_i64
dists.sort.each do |d, i, j|
  next if bang[i] || bang[j]
  if i == 0
    bang[j] = true
    ans += 1
  else
    bang[i] = true
    bang[j] = true
  end
end
puts ans
0