結果

問題 No.453 製薬会社
ユーザー t8m8⛄️
提出日時 2016-12-04 00:55:44
言語 Nim
(2.2.0)
結果
AC  
実行時間 2 ms / 2,000 ms
コード長 561 bytes
コンパイル時間 3,244 ms
コンパイル使用メモリ 65,408 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-06-29 20:55:45
合計ジャッジ時間 4,143 ms
ジャッジサーバーID
（参考情報） 		judge3 / judge1
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 4
other AC * 9
権限があれば一括ダウンロードができます

ソースコード

diff # 

import strutils, sequtils

proc val(ca, c, d: float): float =
  var
    cb = c - ca
    da = ca / 3
    db = cb*5 / 2
  if da <= d:
    result += (ca + da) * 1000
  if da + db <= d:
    result += (cb + db) * 2000

when isMainModule:
  var
    tmp = stdin.readLine.split.map(parseFloat)
    (c, d) = (tmp[0], tmp[1])
    l = 0.0
    r = c

  for i in 0..200:
    var
      ll = (l + l + r) / 3
      rr = (l + r + r) / 3
    if val(ll, c, d) < val(rr, c, d):
      l = ll
    else:
      r = rr

  echo max(val((l + l + r) / 3, c, d), val((l + r + r) / 3, c, d))
0