結果

問題 No.1944 ∞
ユーザー tomerun
提出日時 2025-07-26 12:36:41
言語 Crystal
(1.14.0)
結果
WA  
実行時間 -
コード長 306 bytes
コンパイル時間 14,500 ms
コンパイル使用メモリ 311,424 KB
実行使用メモリ 21,124 KB
最終ジャッジ日時 2025-07-26 12:38:09
合計ジャッジ時間 14,884 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge5
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 36 WA * 1
権限があれば一括ダウンロードができます

ソースコード

diff # 

n, x, y = read_line.split.map(&.to_i64)
rs = read_line.split.map(&.to_i64).sort
r0 = rs.shift
[r0, -r0].each do |rf|
  min = max = rf
  rs.each do |r|
    max += r * 2
    min -= r * 2
  end
  d = (x ** 2 + y ** 2) ** 0.5
  if min - 1e-7 <= d && d <= max + 1e-7
    puts "Yes"
    exit
  end
end
puts "No"
0