結果

問題 No.2352 Sharpened Knife in Fall
ユーザー magurofly
提出日時 2023-06-16 21:55:52
言語 Crystal
(1.14.0)
結果
WA  
実行時間 -
コード長 384 bytes
コンパイル時間 13,075 ms
コンパイル使用メモリ 295,552 KB
実行使用メモリ 6,948 KB
最終ジャッジ日時 2024-06-24 14:01:35
合計ジャッジ時間 14,251 ms
ジャッジサーバーID
(参考情報)
judge3 / judge5
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 1 WA * 2
other WA * 19
権限があれば一括ダウンロードができます

ソースコード

diff #

R = 1
K = 2

R2 = R * R * 1.0
f = ->(y: Float64) { dy = Math.sqrt(R2 - y * y); (y * dy + R2 * Math.atan(y / dy)) }
s = Math::PI * R2 / (K + 1)

ans = [] of Float64
prev = -R.to_f64
K.times do
  ac = R.to_f64
  wa = prev
  s0 = f.call(prev)
  100.times do
    wj = (ac + wa) * 0.5
    if f.call(wj) - s0 >= s
      ac = wj
    else
      wa = wj
    end
  end
  puts ac
  prev = ac
end
0