Ejemplo de Algoritmo en PseInt que realiza la conversión del sistema de numeración decimal al sistema de numeración Maya

Los Mayas fueron una civilización avanzada de Latinoamérica que desarrollaron la ciencia en grandes dimensiones, fueron realmente avanzados, siendo muy conocidos por su calendario. Pero además de la astronomía también desarrollaron la matemática y parte de ella es su sistema de numeración.

Este es un sistema posicional de base 20, es decir, emplea 20 símbolos, siendo una característica llamativa que estos símbolos tienen a su vez una regla de composición de base cinco y aún más interesante el empleo del cero, lo cual demuestra su gran inteligencia. 

Estos eran

0 

se representaba con un caracol

1  .

2 ..

3 ...

4 ....

5 ----

6 

.

----

Además se escribían de arriba a abajo y no como sotros que lo hacemos de izquierda a derecha.

Proceso NumeracionMaya

Definir n como entero;
Definir nm como entero;
Definir i como entero;
Definir len como entero;
Definir tmp como entero;

Dimension nm[1000];


Escribir "Ingrese el numero en decimal";
Leer n;
i <- 0;

Mientras n > 0 Hacer
nm[i] <- n % 20;
n <- n - nm[i];
n <- n / 20;
i <- i+1;
FinMientras

len <- i;

Para i<- len -1 Hasta 0 Con Paso -1 Hacer



Si nm [i] = 0 Entonces
Escribir "caracol";
Sino
Mientras nm[i] > 0 Hacer
tmp <- nm[i]%5;
nm[i] <- nm[i] - tmp;
Si tmp = 0 Entonces
nm[i] <- nm[i] - 5;
FinSi

Segun tmp Hacer
0:
Escribir "-----";
1:
Escribir "  .  ";
2:
Escribir " . . ";
3:
Escribir ". . .";
4:
Escribir "....";


FinSegun
FinMientras
FinSi

Escribir  "  ";
FinPara


FinProceso