Buscar

Como indexar um vetor?

Código

//Veja o exemplo:
for x := 1 to 10 do
for y := 1 to 10 do
if array[x] < array[y] then begin
varaux := array[y];
array[y] := array[x];
array[x] := varaux;
end; {Consiste no seguinte para cada item do vetor você verifica todos os outros, se for menor faz a troca. }

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%

Detalhes da dica

Categoria: Arquivos
Adicionada dia: 06/06/03
Por: Felipe Monteiro
Visualizada: 3430 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009