import Data.List

main = do
    ns <- getLine
    as <- getLine
    let n = read ns :: Int
    let a = map read $ words as :: [Int]
    print $ zip a [1..n]
    mapM_ print $ map snd $ sort $ zip a [1..n]
