Pascal/Turbo Pascal - quiero ayuda sobre un programa que no entiendo en

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