Delphi - CODETYPHON / DELPHI

HOLA! NECESITO AYUDA DE LOS QUE SABEN POR FA. PARA ESCRIBIR LOS CÓDIGOS FUENTE/ALGORITMOS CORRESPONDIENTES.

*Se dice que un número es automórfico si su cuadrado termina con el mismo número. Los primeros
números automórficos son 5, 6, 25, 76, 376, 625... En efecto: 52=25, 62=36, 252= 625, 762= 5776,
3762= 141376...

*Dado un número entero positivo, su crápulo es el valor que se obtiene sumando los dígitos que lo
componen. Si el resultado de la suma es menor que 10, el crápulo es el valor obtenido. Sino el crá-
pulo es el crápulo de la suma de los dígitos.
Ejemplo:
Número Crápulo
7 7
13 4
492 6
5678 8

* Un número primo es un número natural mayor que 0 que tiene únicamente dos divisores: él mismo
y el 1. Por ejemplo, 17 es primo porque sólo tiene dos divisores (1 y 17), pero 24 no es primo
porque sus divisores son 1, 2, 3, 4, 6, 8, 12 y 24. Un número primo reversible es un número
primo que continúa siendo primo luego de invertir el orden de sus cifras. Por ejemplo (199, 991) o
(7589, 9857). Los números capicúa no se consideran primos reversibles.

*Desarrollar una aplicación visual CodeTyphon que permita ingresar un número entero entre 1 y 100000 e
informe:
a. Si el número es automórfico o no.
b. El crápulo del número ingresado.
c. Si el número es primo reversible o no.

GRACIAS...