open Scanf open Printf let () = let a, b = scanf "%d %d" (fun x y -> x, y) in if abs (b / a - 40) < 100 then printf "1\n" else printf "2\n";