Pascal/Turbo Pascal - Ayudenme con un ejercicio que determine si un numero es automorfico utilizando subprogramas

Filtrado por el usuario: ShFile
<<>>
Filtrado por el usuario 'ShFile' (Eliminar fitro)
 
Vista: