Pascal/Turbo Pascal - no me funciona igualar un real aun array del tipo real

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