Menor e maior valor

[Vander]

Ola;
Em uma série de números com no mínimo 2 e no máximo 10 números como pegar o menor e o maior valor ?

EX: 21.00 – 21.10 – 25.13 -23.32 – 20.01
Neste caso pegar o 21.00 e 25.13

De uma forma mais trabalhosa (são 10 séries de números), eu posso jogar os números em um DBF temporário indexar e pegar os valores corretos, mas como pegar estes valores de outra forma ?

Obrigado;
Vander

[Itamar M. Lins Jr.]

Onde estão os valores ?
Jogar no array, asort...

Código: Selecionar todos

nMinimoValor := aValores[1]
nMaximoValor := aValores[len(aValores)]

Saudações,
Itamar M. Lins Jr.

[Vander]

Itamar;
Os valores então em DBF.

[Euclides]

Vander,

Código: Selecionar todos

   use arquivo
   nMin := nMax := valor
   dbeval( {|| iif(nMin > valor, nMIn := valor,), iif(nMax < valor, nMax := valor,) } )
   ? str(nMin)+str(nMax,15)

[]'s, Euclides

[Itamar M. Lins Jr.]

Ola!
Ué ?

Os valores então em DBF.

Então é só indexar, mais um TAG ai... ou indexar em memoria se for o caso. Ou usar a função do Euclides...

Saudações,
Itamar M. Lins Jr.

[alxsts]

Olá!

Os valores então em DBF.

Será que é tão simples assim? Não se conhece o formato do DBF. E se os valores estiverem em cada linha do DBF? Exemplo:

Código: Selecionar todos

Recno  c1  c2  c3  c4  c5  c6  c7  c8  c9  c10
  1    14  16   1   6   9   0   0   0   0   78
  2     4  26   0   9   2   0   0   0   0    0
  3     0   8   2   7   3   0   0   0   1    0
  4    14  14  14   5   4   3   2   1   0   -1

[Vander]

Obrigado a todos;

Resolvido com a função do Euclides.


Vander