Pascal/Turbo Pascal - ¿Qué estoy haciendo mal? ¿por qué me da error?

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