Scanf.scanf "%f" (fun n -> let r = max 1 (int_of_float (sqrt (n /. 3.))) in Printf.printf "%d\n" r )