fun readInt () = valOf (TextIO.scanStream (Int.scan StringCvt.DEC) TextIO.stdIn) val () = let val k = readInt () val s = readInt () val ans = (k * s) div (100 - k) + s in print (Int.toString ans ^ "\n") end