Sort di array

3 Risposte

• Y

  y2ksw

  Molto attivo

  Iscritto da

  lug, 2003

  Messaggi:

  741

  Re: Sort di array

  08 nov 2004, 19:35

  Bubble-Sort ottimizzato, ottimo per piccoli array di ogni genere.
  
  La velocità dipende fortemente dalla potenza del server, ma se è buona, anche array di certe dimensioni sono ordinati rapidamente.
  
  <pre id=code><font face=courier size= id=code>
  Dim i
  Dim j
  Dim n
  Dim v
  
  n = UBound(arr)
  
  For i = LBound(arr) To n
  For j = i + 1 To n
  If arr(i) > arr(j) Then
  v = arr(i)
  arr(i) = arr(j)
  arr(j) = v
  End If
  Next
  Next
  </font id=code></pre id=code>
  
  
  Giovanni
  ---
  http://www.y2ksw.com/vbulletin
• F

  fabio_v

  Utente Attivo

  Iscritto da

  apr, 2003

  Messaggi:

  235

  Re: Sort di array

  11 nov 2004, 11:14

  Scusa se ti contraddico, ma quello da te indicato non mi sembra un algoritmo di bubble-sort...
  Il bubble sort si occupa come prima cosa di far emergere (proprio come delle bolle che vanno verso l'alto) il valore maggiore e di portarlo in evidenza. Poi prosegue con i confronti.
  In sostanza, avremo n cicli quanti sono gli elementi, ognuno formato da n confronti meno il numero del ciclo che si sta compiendo...
  O sbaglio?
  Ti prego correggimi se ho detto un'oscenità.
  Mi sembra che quello che hai riportato sia invece un algoritmo di ordinamento classico (confronto un elemento con tutti gli altri, poi passo al successivo e lo confronto nuovamente con tutti gli altri...
  Chiaramente, funziona benissimo anche questo, ma non credo sia un algoritmo di bubble sort....
  Grazie mille.
  FABIO
  
  fabio
• Y

  y2ksw

  Molto attivo

  Iscritto da

  lug, 2003

  Messaggi:

  741

  Re: Sort di array

  11 nov 2004, 19:32

  Verificherò. Credevo che fosse bubble
  
  Giovanni
  ---
  http://www.y2ksw.com/vbulletin