Module Module1
 
    Sub Main()
 
        Dim S As String = Console.ReadLine()
        Dim tmp As String() = Split(S, " ")
        Dim N As Integer = CLng(tmp(0))
        Dim K As Integer = CLng(tmp(1))
        Dim Q As Integer = CLng(tmp(2))
        Dim t As Integer = Q - K
 
        Dim A(N) As Integer
        Dim c As Integer
 
        For c = 0 To Q - 1
            A(CLng(Console.ReadLine()) - 1) += 1
        Next
 
        For c = 0 To N - 1
            If t < A(c) Then
                Console.WriteLine("Yes")
            Else
                Console.WriteLine("No")
            End If
        Next
 
    End Sub
 
End Module