Scanf.scanf "%d" (fun c ->
    Printf.printf "%d %d\n" 1 c
)