import Control.Monad

main = do
  _ <- getLine
  numbers <- fmap (map read . words) $ getLine
  let possibleAdditions = map addAll . filterM (\x -> [True, False]) $ numbers
  _ <- getLine
  targets <- fmap (map read . words) $ getLine
  mapM_ putStrLn $ map (yesno . (`elem` possibleAdditions)) targets

addAll :: [Int] -> Int
addAll [] = 0
addAll xs = foldl (+) 0 xs

yesno :: Bool -> String
yesno True  = "yes"
yesno False = "no"