Pascal/Turbo Pascal - ayudaa no me sale este ejercicio

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