Pascal/Turbo Pascal - hola nesecito ayuda con este codigo

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