Ejemplo Lenguaje Algoritmico

// El objetivo del juego es mover los discos de la torre 1 a la 3 en la

// menor cantidad de movimientos posible. No se puede colocar un disco de

// un tamanio sobre otro mas chico

// Hay una matriz que representa las torres, cada columna contiene

// nros que representan los tamanios de los discos en esas torres (solo

// interesan los valores hasta la cantidad de discos de esa torre).

// Cuantos discos tiene cada torre lo dice el vector cant_discos.

Proceso Hanoi

Dimension torres[3,10], cant_discos[3];

// pedir y validar cuantos discos colocar en la primer torre

Escribir "Ingrese el nro de discos (1-5):";

leer discos;

mientras discos<1 O discos>8 Hacer

Escribir "El numero de discos debe ser mayor a 0 y menor a 5:";

leer discos;

finmientras

// inicializar los datos

cant_discos[1]<-discos;

cant_discos[2]<-0;

cant_discos[3]<-0;

para i<-1 hasta discos hacer

torres[1,i]<-discos-i+1;

finpara

cant_movs<-0;

// jugar!

mientras cant_discos[3]<>discos Hacer // mientras no esten todos los discos en la tercer torre, el juego sigue

para i<-1 hasta 3 Hacer // dibujar las tres torres

escribir "";

escribir "Torre ",i;

si cant_discos[i]=0 Entonces

Escribir "";

sino

para j<-cant_discos[i] hasta 1 con paso -1 Hacer // recorrer los discos de la torre, de arriba hacia abajo

segun torres[i,j] Hacer // dibujar cada disco

1: escribir " XX";

2: escribir " XXXXXX";

3: escribir " XXXXXXXXXX";

4: escribir " XXXXXXXXXXXXXX";

5: escribir " XXXXXXXXXXXXXXXXXX";

6: escribir " XXXXXXXXXXXXXXXXXXXXXX";

7: escribir " XXXXXXXXXXXXXXXXXXXXXXXXXX";

...