Scanf.scanf "%d %d" (fun n k -> Printf.printf "%d\n" @@ if n < k then 0 else 1 lsl (n - k) )