Pascal/Turbo Pascal - ayuda me complila pero no hace lo k kiero¡¡

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