import strutils, math

proc input: string =
  while true:
    let t = stdin.readChar
    if t.isSpaceAscii: break else: result.safeAdd t

proc f(N, K: int): int =
  50 * N + (50 * N.float / (0.8 + 0.2 * K.float)).round(2).int

let A, B = input().parseInt

echo f(A, B)