}

Ordenar alfabéticamente

1987/04/01 Arrojeria, Eustakio - Elhuyar Zientziaren Komunikazioa | Lizaso, Pili - Informatika SailaElhuyar Fundazioa Iturria: Elhuyar aldizkaria

Queremos ordenar la tabla alfabéticamente. Ahora y poniendo en marcha tu imaginación, imagina que esta tabla se ha apilado en una tabla llamada T compuesta por cinco ventanillas.

En un momento en el que la ordenación de una lista de números o letras se ha convertido en un lema cotidiano, el programador tiene la necesidad de encontrar una solución inmediata a este problema. Por otro lado, cualquier programa de carácter administrativo tiene una estructura similar a la de este programa. Por tanto, teniendo en cuenta esto, procederemos a su programación.

El método que utilizaremos es el habitual y consiste en:

Supongamos que queremos ordenar alfabéticamente la tabla como C A D E B. Ahora y poniendo en marcha tu imaginación, piensa que esta tabla se ha apilado en una tabla llamada T compuesta por cinco ventanillas:

Por otro lado, existe un registro alternativo denominado R.

La misma está inicialmente vacía.

Los pasos a seguir son los siguientes:

    Tomar el primer elemento de la lista (T1=C)
    Ver si es anterior o posterior al que viene a continuación. Si fuera anterior, habría que compararlo con el tercero. En cambio, si fuera de fondo, habría que cambiarlos por orden. El camino utilizado es el siguiente: Hacer lo mismo con todas las letras. Así, la letra que aparecerá en la taquilla T1 por orden alfabético será la primera.
  1. Inicializar el proceso pero con la letra en la taquilla T2 en este caso.

Así hasta finalizar todos.

Así, el programa ordena alfabéticamente la lista. Pero a la hora de presentar los resultados nos pondrá dos listas, una sin orden y otra ordenada.

NOTA: Si la lista de palabras que se quiere ordenar es muy larga, quizás sea necesario el uso de la orden (CLEAR) de guardar la memoria (en algunos ordenadores). Ver manual de ordenador del orden CLEAR.

Listado 10 REM
= 120$ ALFABÉTICO **
20 CLEAR
30


PRINT











=



70


CLS
80





PRINT

Gai honi buruzko eduki gehiago

Elhuyarrek garatutako teknologia