Programación General > Pascal

 Otra preguntica xD

(1/1)

Juann:
Bueno tenga otra preguntilla...


--- Código: Pascal ---program prueba;uses crt;Var a,b:integer;var respuesta:CHAR;       Begin   Begin      Write('Ingrese el primer número : ');readln(a);      ClrScr;      Write('Ingrese el segundo número : ');readln(b);      ClrScr;      Writeln('La suma es : ',a+b);      repeat      until keypressed;  End; Begin      ClrScr;      Repeat          writeln('¿Desea salir de la aplicacion?: S/N '); readln (respuesta)      Until respuesta='S';End;End.  
En este code, el ejecutara la suma y luego te preguntara si quieres salir de la aplicacion, si la respuesta es si, pues la finalizara... Pero quiero saber como poner, para que en caso de que el usuario diga que no, se repita toda la aplicacion, es decir, vuelva a pedir los numeros y eso...

aguila3000:
Si revisas bien tu programa hay muchos errores.
Sólo necesitas un bucle Repeat Until
Algo asi :


--- Código: Pascal ---    Repeat     {Aqui colocas todas las instrucciones que quieres se repitan}     writeln('¿Desea salir de la aplicacion?: S/N '); readln (respuesta)   Until respuesta='S'  

Dynyck:
Tener en cuenta que el caracter puede ser 'S' o 's'.

Navegación

[0] Índice de Mensajes

Ir a la versión completa