import Control.Monad
import Data.Maybe
import qualified Data.ByteString.Char8 as BS
import Data.List

readInt = fst . fromJust . BS.readInt
readIntList = map readInt . BS.words
getInt = readInt <$> BS.getLine
getIntList = readIntList <$> BS.getLine

main = do
    [n, k, q] <- getIntList
    as <- replicateM q getInt
    mapM_ putStrLn $ solve n k q as

solve n k q as = map (yn . flip (-) (q-k+1) . length) . group . sort $ as ++ [1..n]
    where yn x | x > 0 = "Yes"
               | otherwise = "No"