package main

import . "fmt"
import . "os"
import bf "bufio"

func main() {
	rd := bf.NewReader(Stdin)
	wr := bf.NewWriter(Stdout)
	defer wr.Flush()
	var n int
	Fscan(rd,&n)
	t := map[int]int{}
	for ; n > 0; n-- {
		var a int
		Fscan(rd,&a)
		t[a]++
	}
	var q int
	Fscan(rd,&q)
	for ; q > 0; q-- {
		var x,k int
		Fscan(rd,&x,&k)
		if t[x] >= k {
			Fprintln(wr,"Yes")
		} else {
			Fprintln(wr,"No")
		}
	}
}