SoloCodigo

Programación General => Pascal => Mensaje iniciado por: rodo1985 en Sábado 28 de Abril de 2007, 21:06

Título: Problema En Run Del Freepascal
Publicado por: rodo1985 en Sábado 28 de Abril de 2007, 21:06
hola a todos soy nuevo , estoy curasando esta materia por primera vez en la facultad de ingenieria y me descargue el compilador freepascal ...

el problema que tengo es el siguiente ...

program prueba1;
var s,a,b:real;
begin
  readln (a,b);
  s:=a+b;
  writeln (s);
end.



cuando le doy run , en DOS y pongo ejemplo el numero 1 y el numero 2, salta y no veo el resultado y vulve al programa , como ago para que cuando ponga cualquier valor, me calcule la suma sin tener que volver a la ventana del programa pascal  .....

bueno gracias por sus respuestas.......
Título: Re: Problema En Run Del Freepascal
Publicado por: Enko en Sábado 28 de Abril de 2007, 21:17
Código: Text
  1.  
  2. program prueba1;
  3. var
  4.    s,a,b:real;
  5. begin
  6.    Write('Escriba 2 numeros');
  7.    Readln (a);
  8.    Readln(b );
  9.    s:=a+b;
  10.    writeln ('El resultado es: ', s);
  11.    Readln;   //esto va a esperar a que el usuario presione la tecla Enter
  12. end.
  13.  
  14.  
Pues la verdad lo 'unico que te falta es un Readln al final de programa para esperar que el usuario presione enter para salir.
Título: Re: Problema En Run Del Freepascal
Publicado por: rodo1985 en Sábado 28 de Abril de 2007, 23:42
gracias amigo .....ahora tendre que practicar y practicar ...........