Scanf.scanf "%d" (fun n ->
    for i = 1 to n do
        Scanf.scanf " %d" @@ Printf.printf "%d\n"
    done
)