Scanf.scanf "%d" (fun n ->
    let a = Array.init n (fun i -> Scanf.scanf " %d" (fun a -> a, i + 1)) in
    Array.sort compare a;
    Array.iter (fun (_, i) -> Printf.printf "%d " i) a;
    print_newline ()
)