Código de Pascal/Turbo Pascal - Capicúa

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