Pequeño Problemita en (PASCAL) de un Principiante.

[MasterXNicoX]

Hola Gente, Recien Estoy Aprendiendo a Programar en Pascal, y bueno tengo un problemita, que creo que es simple de resolver para alguien que sabe, jeje..

Bueno, les comento...

Este es el programa en si:

program suma_de_numeros;
var N1,N2,total:integer;
begin
write ('Escriba PRIMER numero a sumar ');
read (N1);
write ('Escriba SEGUNDO numero a sumar ');
read (N2);
total:=N1+N2;
write('El Resultado de su suma es: ',total);
end.

Bueno, el problema es que, lo ejecuta bien y todo, pero cuando pone "el resultado de la suma es:" la ventanita de DOS se cierra automaticamente en menos de un segundo.

Lo Que yo quiero, es saber como se puede hacer para que la ventanita NO se Cierre..

Por Favor si alguien puede ayudarme con este problemita, estaria muy agradecido, un saludo!.


Intente Ponerle el System ("pause"); return 0; pero se sigue cerrando ni bien da el resultado..

Me Quedo Asi:

program suma_de_numeros;
var N1,N2,total:integer;
begin
write ('Escriba PRIMER Numero a Sumar: ' );
read (N1);
write ('Escriba SEGUNDO Numero a Sumar: ' );
read (N2);
total:=N1+N2;
write('El Resultado de la Suma es: ' ,total);
{system("pause")
return 0}
end.

[Fueguino]

poner un readln(); al final. pascal no tiene una palabra reservada llamada system.

[MasterXNicoX]

PROBLEMA SOLUCIONADO:

NO era con lo que dijiste Fueguino, pero gracias igual..

Habia que poner un "read (N3);" Abajo de "write('El Resultado de la Suma es: ' ,total);"

y un "N3" --------> "var N1,N2,"ACA" ,total:integer;"

JEJEJE, Nos Vemos!!

[Fueguino]

y un read() ?

[makaay9]

se pone un readln al final y ya está