Códigos Fuente de Pascal/Turbo Pascal

Código que muestra la descomposición en factores primos de un entero dado por el usuario.
Desarrollado en Turbo Pascal 7.0.

Código que muestra en tamaño muy grande la hora del sistema.
Creado con Turbo Pascal 7.0

Un capicúa es un número que se lee igual de izquierda a derecha que de derecha a izquierda. Por ejemplo, 2882 es un capicúa de 4 cifras y 49194 es un capicúa de 5 cifras.
Hay pares de capicúa de 4 cifras cuya suma es un capicúa de 5 cifras. Este código, encuentra estos pares de capicúas de 4 cifras que cumplen lo descrito anteriormente (los escribe en el fichero de texto capicua.txt).
Creado con Turbo Pascal 7.0

Código que permite saber el resto de dividir un número de hasta 250 (1*10^250) cifras por uno menor que 2*10^10.
Ejemplo: 1234787868564578989687568565765 al ser dividido por 4567 deja resto 1733.
Creado con Turbo Pascal 7.0

Código que devuelve los números primos comprendidos entre dos valores introducidos por el usuario.
Utiliza la función L (numerosprimos.5u.com)
Realizado en Turbo Pascal 7

Este un algoritmo conocido desde la antigüedad, para determinar todos los números primos desde 2 hasta un cierto valor n.
El algoritmo está basado en "marcar" todos los números que son múltiplos de algún otro menor. Al final, los números que "hayan sobrevivido a tal marcado" por supuesto, son primos.

Creado con Turbo Pascal 7.0.

Funciones para convertir un numero decimal a binario, sumar y multiplicar numeros binarios
Creado con TP 7.0.

Código que convierte un numero romano a decimal.
Creado con Turbo Pascal 7.0.

Programa que calcula el mcd de dos números enteros mediante el algoritmo de Euclides.
Creado con TP 7.0

Una unit(primo.pas) con tres funciones para determinar si un número es primo. También otras dos units, allprime.pas con todos los números primos desde 2 hasta 46337 y time.pas para saber el tiempo de ejecución de un programa. Y dos programas auxiliares.
OBJETIVO: Optimizar lo mejor posible la función que determina si un número es primo.
Creado con TP 7.0