Pascal/Turbo Pascal - Consulta fácil

Buenas

Imagino que será una chorrada, pero no encuentro la forma de hacer un control de errores sobre un dato

El dato es un longint y quiero que si al pedir ese dato se introducen letras o algo q no sea un longint, de un mensaje de error. Como hago ese control de errores???

Bueno yo no te voy a dar la respuesta entera si no solo la idea ya que aquí solo te ayudamos para que por ti mismo aprendas. ; )

Dicho eso pues la idea básica es que nada mas coloques un ioresult o comprobación de errores de entrada y salida con un IF algo así…

Si por ejemplo lo que necesitas es una variable de tipo entero (integer) y lo que el usuario introduce es un Carácter (char) o una cadena de caracteres (string), bueno as esto.

Var
Num : integer;

Write(‘Introduce un número : ’);
{$I-} <<----- Esto desactiva la comprobacion de errores.
Readln(num);
{$I+} <<----- Y esto las activa.
if ioresult<>0 then writeln(‘¡se introdujo un dato invalido!’);
^^^----- ioresult almacena el codigo de error (si ioresult = cero entonces todo bien)

y pues listo.