import sequtils, strutils

let
  m = parseInt stdin.readLine.split.`[]` 1
  ls = stdin.readLine.split.map(parseInt).filterIt(it <= m)
  
var seq = 0.repeat succ m

for l in ls: inc seq[l]
for i in 1 .. m: echo i, " ", seq[i]