Avatar billede dennisbjorn Juniormester
29. oktober 2014 - 19:55 Der er 3 kommentarer og
1 løsning

find lavest værdi i array

hej,

Denne funktion returnerer den lavest værdi fra et array.
Hvordan får jeg den til ikke at medtage'0' så outputtet bliver = 3

altså noget i stil med:

function findmin(arrNumbers)
    dim result
    result = arrNumbers(0)
    for each i in arrNumbers
      if i < result then
        result = i
      end if
    next
    findmin = result
end function
   
OutputArray=Array(0,14,20,45,25,4,33,0,3,31,22,7,4)

response.Write(findmin(OutputArray))
Avatar billede arne_v Ekspert
29. oktober 2014 - 20:16 #1
if i < result then

->

if i < result and i > 0 then

maaske
Avatar billede dennisbjorn Juniormester
29. oktober 2014 - 20:30 #2
hej Arne

Hvis den første værdi i array'et >0 så fungerer din tilføjelse, men ikke når den først værdi = 0
Avatar billede dennisbjorn Juniormester
29. oktober 2014 - 22:00 #3
function findmin(arrNumbers)
    dim result
   
    for f = 0 to UBound(arrNumbers)
      if arrNumbers(f) > 0 then
        result = arrNumbers(f)
      end if
    next

    for each i in arrNumbers
      if i < result and i > 0 then
        result = i
      end if
    next
   
    findmin = result
end function
   
OutputArray=Array(0,0,0,0,0,14,20,45,25,3,33,0,3,31,22,7,4)

response.Write(findmin(OutputArray))
Avatar billede arne_v Ekspert
30. oktober 2014 - 02:04 #4
Bare:

result = arrNumbers(0)

->

result = 32767

havde vaeret nemmere.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester