結果

問題 No.1265 Balloon Survival
ユーザー yuruhiya
提出日時 2020-10-23 22:10:51
言語 Crystal
(1.14.0)
結果
AC  
実行時間 123 ms / 2,000 ms
コード長 536 bytes
コンパイル時間 12,237 ms
コンパイル使用メモリ 299,116 KB
実行使用メモリ 32,640 KB
最終ジャッジ日時 2024-06-30 21:30:33
合計ジャッジ時間 14,668 ms
ジャッジサーバーID
(参考情報)
judge2 / judge3
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 4
other AC * 32
権限があれば一括ダウンロードができます

ソースコード

diff #

lib C
  fun strtoll(s : UInt8*, p : UInt8**, b : Int32) : Int64
end

class String
  def to_i64
    C.strtoll(self, nil, 10)
  end
end

n = read_line.to_i
x, y = (1..n).map { read_line.split.map(&.to_i64) }.transpose
dist = (0...n).flat_map { |i|
  (i + 1...n).map { |j|
    {(x[i] - x[j])**2 + (y[i] - y[j])**2, i, j}
  }
}.sort

flag = [true] * n
ans = 0
dist.each do |(d, i, j)|
  if flag[i] && flag[j]
    if i == 0
      ans += 1
      flag[j] = false
    else
      flag[i] = false
      flag[j] = false
    end
  end
end
puts ans
0