Pascal/Turbo Pascal - Alguien me puede hacer este programa en pascal, URGENTE

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