Pascal/Turbo Pascal - Comprobación de datos correctos en Pascal

 
Vista:

Comprobación de datos correctos en Pascal

Publicado por Alex (1 intervención) el 08/10/2016 17:12:28
Buenos, estoy aprendiendo a programar por primera vez y me ha surgido una duda creo que muy básica para una duda a fin de cuentas.

Y es como hacer en Pascal para comprobar que determinados datos se han introducido de forma correcta. Quiero decir en caso de que se defina una variable de tipo integer y el usuario inserte un carácter el programar se cerrará; ¿de que manera se podría dar un mensaje de error? ¿Solo con bucles o hay más maneras?

Espero haberme explicado algo..
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Comprobación de datos correctos en Pascal

Publicado por ramon (2158 intervenciones) el 08/10/2016 22:08:49
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
{A ver si esto te aclara dudas }
 
 program comprobar;
  uses
    crt;
      var
        numero : integer;
        repite : boolean;
 
   begin
    repeat
      clrscr;
      write('   Entre Numero Entero : ');
      {$I-} readln(numero); {$I+}
      if ioresult <> 0 then
      begin
         writeln('  Error En El Numero Entrado Pulse Una Tecla');
         repite := true;
         readkey;
      end
   else
      begin
         writeln('   El Numero Entrado Es : ',numero);
         writeln('   Pulse Una Tecla');
         repite := false;
         readkey;
      end;
    until repite = false;
   end.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar