a:數組[0..1000000]的字符串；
n，m，t，I，j:longint；
s:字符串；
p:布爾型；過程kp(i，j:longint)；定義變量
l，r:longint；
mid:字符串；開始
l:= I；
r:= j；
mid:= a[(I+j)div 2]；重復
而a[I]& lt；mid do公司(壹)；而a[j]>十二月中旬；如果我& lt=那麽j
開始
a[0]:= a[I]；
a[I]:= a[j]；
a[j]:= a[0]；
inc(壹)；
第十屆會議；結束；直到我& gtj；如果我& ltj然後kp(l，j)；如果我& ltr那麽kp(i，r)；結束；過程jb(i，j:longint)；定義變量
k:longint；開始
如果我& gtj然後退出；
k:=(I+j)div 2；如果a[k]=s，那麽
開始
p:=真；退出；結束；如果s & lta[k]那麽jb(i，k-1) else jb(k+1，j)；結束；開始
readln(n)；對於i:=1到n do readln(a[I])；
kp(1，n)；
readln(米)；對於j:=1到m do
開始
readln(s)；
p:=假；
jb(1，n)；如果p則writeln('Yes ')否則writeln(' No ')；結束；結束。
完整回答，請收下，謝謝！