import Data.Char
import Data.List
import qualified Data.ByteString.Char8 as BS

main = do
  n <- readLn :: IO Int
  as <- unfoldr (BS.readInt . BS.dropWhile isSpace) <$> BS.getLine
  let bs = sort $ zipWith (\a b -> (a, b)) as [1..]
   in putStrLn $ foldr (\x acc -> (show $ snd x) ++ " " ++ acc) "" bs