Scanf.scanf "%d %d" (fun k s -> Printf.printf "%d\n" @@ 100 * s / (100 - k) )