let N = stdin.ReadLine() |> int

let A =
    stdin.ReadLine().Split()
    |> Array.map int
    |> Array.countBy id
    |> Map<int, int>

[| 1..N |]
|> Array.map (fun x ->
    if A |> Map.exists (fun y _ -> x = y) then A.[x]
    else 0)
|> Array.iter stdout.WriteLine
