![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#4
|
|||
|
|||
|
Hay varios algoritmos para ordenar matrices:
Burbuja, inserción, mezcla, ordenación rápida (qsort), etc Este es el procedimiento qsort para ordenar un arreglo bidimensional (un vector de n elementos) Para una matríz vas a tener que hacer algunas modificaciones según que columna quieras usar para ordenar o si querés ordenar por filas. Para algo más detallado te convendría ver el sitio numerical recipes o alguno parecido Código Delphi [-] procedure qsort(var a: arr;prim,ult,sen1:integer); procedure quicksort(var a: arr; ilo, ihi: integer); var lo, hi, mid, t: integer; begin lo := ilo; hi := ihi; mid := a[(lo + hi) div 2]; repeat while a[lo] < mid do inc(lo); while a[hi] > mid do dec(hi); if lo <= hi then begin t := a[lo]; a[lo] := a[hi]; a[hi] := t; inc(lo); dec(hi); end; until lo > hi; if (hi > ilo) then quicksort(a, ilo, hi); if (lo < ihi) then quicksort(a, lo, ihi); end; begin quicksort(a, prim, ult); end; saludos |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
Temas Similares
|
||||
| Tema | Autor | Foro | Respuestas | Último mensaje |
| funciones y matrices | anto1178 | Varios | 1 | 28-08-2006 17:29:31 |
| Matrices | sergio_015 | OOP | 3 | 09-03-2005 19:53:07 |
| Matrices | mmtaffarel | OOP | 2 | 15-10-2004 03:19:27 |
| Matrices dinámicas | jplj | Varios | 2 | 30-08-2004 08:57:38 |
| Matrices - problemas..... | arieleb | Varios | 1 | 21-09-2003 12:30:35 |
|