S=[]
H=[]
C=[]
D=[]
n = gets.to_i
n.times do
    i = gets
    t = i.split[0]
    r = i.split[1].to_i
    S[r] = 1 if t == "S"
    H[r] = 1 if t == "H"
    C[r] = 1 if t == "C"
    D[r] = 1 if t == "D"
end
13.times do |x|
    x += 1
    print 'S'," ",x,"\n" if S[x] != 1
end
13.times do |x|
    x += 1
    print 'H'," ",x,"\n" if H[x] != 1
end
13.times do |x|
    x += 1
    print 'C'," ",x,"\n" if C[x] != 1
end
13.times do |x|
    x += 1
    print 'D'," ",x,"\n" if D[x] != 1
end

