Busca Binária
Publicado por joao felipe 18/02/2003
[ Hits: 7.893 ]
Homepage: www.motokando.com
Este script faz uma busca binária em um vetor (array), está simples e fácil de ser entendido, lembramos que o vetor deve estar ordenado para que seja possível fazer uma busca binária, para isso vc pode usar meu script de "ordenacao por selecao", qualquer bug encontrado por favor me avise no felipejfs@bol.com.br pois uso este script aqui em um site. Espero que lhe seja util este script. falou.
#!/bin/perl #para uma busca binaria é necessario que o vetor esteja ordenado!!!! @vetor=(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,17,18,19,20); $x=3; #$x será o elemento à procurar. $inicio=0; $fim=@vetor; # $fim recebe o tamanho de @vetor. $meio=int(($inicio+$fim)/2); print "Procurando $x em ". "@vetor". "\n"; while (($x != @vetor[$meio]) && ($inicio!=$fim) && ($inicio<$fim)) { if ($x > @vetor[$meio]) {$inicio=$meio+1} else {$fim=$meio-1} $meio=int(($inicio+$fim)/2); } if ($x == @vetor[$meio]){print "$x encontrado em @". "vetor[". $meio. "]\n";} else {print "$x nao encontrado!! \n";}
GenHASH - Gerador de hashes SHA1, MD5 e Base64 em Perl
Orientação a Objetos - Criando e usando uma classe em Perl
Validador de cartão de débido e crédito em Perl
Wayland em alta, IA em debate e novos ventos para distros e devices
Qt 6.10 e Python 3.14 puxam o ritmo do software livre nesta quarta
Atualizações de Apps, Desktop e Kernel agitam o ecossistema Linux nesta terça-feira
Miyoo Mini Plus + Onion OS (Linux)
IA local no bolso, novo visual no Raspberry Pi OS e mais destaques do software livre
Como mudar o nome de dispositivos Bluetooth via linha de comando
Adicionando o repositório backports no Debian 13 Trixie
queria saber como instalar o android power tools igual ao winux no lin... (7)
Como listar os arquivos em "bloquin... [RESOLVIDO] (6)
Como colocar atalho para uma pasta na área de trabalho do Ubuntu 24.04... (2)