Pascal/Turbo Pascal - repeat con sentencia if

   
Vista:

repeat con sentencia if

Publicado por jorge (7 intervenciones) el 19/02/2008 00:15:14
tengo un problema y esque tengo que repetir un proceso pero la forma mas facil de hacerlo es con repeat

es una factura y cuando pregunta si los datos estan correctos si da "S" tiene que pasar a la siguiente parte de la factura y si pone "N" tiene que volver a ingresar los datos lo que viene despues no es el problema pero no encuentro la sintaxis correcta para el editor de pascal me hacepte lo que yo quiero hacer alguien me puede ayudar solo dandome ideas de como puede ir la sintaxis...

gracias
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

RE:repeat con sentencia if

Publicado por jorge (7 intervenciones) el 19/02/2008 00:25:12
ehhh perdon acepte con "H"
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

RE:repeat con sentencia if

Publicado por Diego Romero (997 intervenciones) el 19/02/2008 20:11:38
No comprendo bien el problema así que respondo según me parece.

function DatosCorrectos: char;
var
a: char;
begin
repeat
Write('¿Datos Correctos? (S,N) ');
a:=upcase(readkey);
until (a = 'S') or (a = 'N');
DatosCorrectos := a;
end;

repeat
{ Aquí el ingreso de datos }
until DatosCorrectos = 'S';
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