Pesquisa binária

É o seguinte, tenho que construir um algoritmo no Visualg que receba 100 nomes em um vetor e organiza-lo em ordem alfabética e também precisa fazer uma pesquisa binária pra procurar algum nome que esteja armazenado no algoritmo.

O que eu fiz por enquanto ta bem simples, porem na parte da pesquisa que ta pegando.

algoritmo "semnome"
var

aux: vetor[1.5,1..20] de inteiro
org: vetor[1..5,1..20] de inteiro
numNomes: vetor[1..5,1..20] de inteiro
nomes: vetor[1..5,1..20] de caracter
i, j: inteiro
nome: VETOR [1..5] de caracter

inicio

//******PEGO OS NOMES DAS PESSOAS
para i de 1 ate 5 faca
escreval("Informe o nome da pessoa")
leia(nome[i])
fimpara

//******MANDO OS NOMES PARA UMA MATRIZ QUE IRÁ SEPARAR CADA LETRA
para i de 1 ate 5 faca
para j de 1 ate compr(nome[i]) faca
nomes[i,j] <- copia(nome[i],j,j)
fimpara
fimpara

//******TRANSFORMO CADA LETRA DA MATRIZ EM NUMERO DA TABELA ASCII
para i de 1 ate 5 faca
para j de 1 ate compr(nome[i]) faca
numNomes[i,j] <- asc(nomes[i,j])
fimpara
fimpara
//Continua com a ordenação da matriz e pesquisa binária

fimalgoritmo

Neste esboço super simples falta apenas terminar a organização da matriz e fazer a pesquisa binária. A organização até sei fazer e já tenho pronto em um caderno, mas como faço a pesquisa?

E existe outra forma de fazer sem que eu mande cada nome para uma matriz?