Scanf.scanf "%d" (fun d ->
    let d = d * 108 in
    Printf.printf "%d.%02d\n" (d /100) (d mod 100)
)