Questão
ID 2124554Disciplina: Tecnologia da Informação
Assunto: Delphi
Ano: 2022 Banca: Colégio Pedro II Órgão: Colégio Pedro II
Dada a função para encontrar um nome em uma listbox:
function TFMain.Busca_Bin(n : longint; nome :________): longint; var l,r,k : longint; meio :_____; achou :______; begin l := 0; r := n-1; achou := false; while(l<=r) and (not achou) do begin meio := (l+r)/2; k:=Trunc(meio); if( nome=listbox11.items[k] ) then achou := not achou else if( x<listbox11.items[k] ) then r := k-1 else l := k+1; end; if( achou ) then Busca_Bin:=k else Busca_Bin:= -1; end; |
Os tipos de variáveis que deverão ser usados para as variáveis identificadas como nome, meio e achou são, respectivamente,