Pascal/Turbo Pascal - urge

corregir el error " invalid floating point operation" y "floating point overflow"

Publica por acá el código en que aparece dicho error. Tiene que ver con alguna variable al que se le ha tratado de asignarun valor fuera del rango establecido para su tipo. Espero tu respuesta. Saludos ;-)