Pascal/Turbo Pascal - Alguien que porfavor me ayude con este programa

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