Scanf.scanf "%f" (fun d ->
    Printf.printf "%f\n" (d *. 27. /. 25.) 
)