Buscar una cadena en un diccionario
a: cadena de matriz [0..1000000]
n, m, t, I, j: longint
s: Cadena ;
p: tipo booleano; procedimiento kp(i, j: entero largo); definir variable
l, r: entero largo
mid: cadena de caracteres; inicio
l:= I;
r:= j;
medio:= a[(I+j)div 2]; >
Y a[I]<mid do company(一);y a[j]>mediados de diciembre;si<=entonces j
Empezar
a[ 0]:= a[I];
a[I]:= a[j];
a[j]:= a[0] ;
inc(1);
finalización de la décima sesión; si i<r entonces kp(l,j); si i<r entonces kp (i, r); : longint); define variable
k: longint; start
si i>j luego sale;
k:=(I+j)div 2; [k]=s, entonces
Inicio
p:=True; finalizar; si s & lta[k] entonces jb(i, k-1) else jb( k+1, j); fin; inicio
readln(n); para i:=1 a n hacer readln(a[ I]);
kp(1,n). );
readln(m); para j:=1 a m hacer
Inicio
readln(s);
p :=false;
jb(1, n); si p entonces writeln('Sí ') en caso contrario writeln('No ') ;
Por favor acepte la respuesta completa, ¡gracias!