import Data.List
main=do
 [n,k,q]<-map read.words<$>getLine
 a<-sort.map read.lines<$>getContents
 putStr$unlines$map(\c->if c+k-q>0 then"Yes"else"No")$f 0 1 n a
f c i n []
 |i>n=[]
 |i<=n=c:f 0(i+1)n[]
f c i n(a:as)
 |i==a=f(c+1)i n as
 |i/=a=c:f 0(i+1)n(a:as)