Scanf.scanf "%f" (fun n ->
    Printf.printf "%.1f\n" (n *. 7. /. 2.)
)