Scanf.scanf "%d" (fun n ->
    Printf.printf "%d\n" @@ (n / 3 + n / 5) * 2
)