Pascal/Turbo Pascal - me tiene loco no consigo el error

Filtrado por el usuario: Joel Rosental R.
<<>>
Filtrado por el usuario 'Joel Rosental R.' (Eliminar fitro)
 
Vista: