error relativo

PROGRAM Leccion5Ejercicio18;

VAR
   medicion, valorVerdadero, errorRelativo: REAL;

BEGIN
   Write('Ingrese la medici¢n y el valor verdadero: ');
   ReadLn(medicion,valorVerdadero);  //Leemos los datos solicitados.
   WriteLn;  //Dejamos una l°nea en blanco.


    (*El error relativo, seg£n la letra del ejercicio, se calcula como
   el valor absoluto de la resta entre la medici¢n y el valor verdadero.
   Dado un n£mero, el valor absoluto se calcula mediente ABS. Eso fue dado
   en la Lecci¢n 4*)
   errorRelativo:= abs(medicion-valorVerdadero);

   WriteLn('Medici¢n = ',medicion);
   Write('Valor verdadero = ',valorVerdadero,' \\ Error relativo = ',errorRelativo);

   ReadLn;

   (*NOTA: En la letra del ejercicio hay una errata al mostrar los datos de salida.*)
END.