Programación Pascal

Mod es una función congruente y Div es una función entera (83 mod 12 = 11) (83 div 12 = 6)

Prueba del programa;

Definir variables

s, t: integer; //Defina s y t como números enteros.

Inicio

Write('Número de entrada:'); //La salida "Número de entrada:" es opcional.

readln(s); //Leer datos

t:= s mod 10; writeln(t); es decir, un bit), salida, s se convierte en la parte entera de s dividida por 10, como s=1636, después de la operación, t=6, s=163.

t:= s mod 10; writeln(t); s:= s div 10; //t=s toma el módulo 10 (es decir, el dígito de las decenas) y genera, S se convierte en el número entero de S dividido por 10 partes, como s=163. Después de la operación, t=3, s=16.

t:= s mod 10; writeln(t); s:= s div 10; //t=s módulo 10 (es decir, centenas), salida, s se convierte en la parte entera de s dividido por 10, como s=16, después de la operación, t=6, s=1.

Escribir contenido; //s son miles.

Fin;