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

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