Pascal/Turbo Pascal - Como hago el siguiente programa

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