Hola, termine mi primer programita en pascal , es una simple calculadora , pero tengo una duda , como puedo hacer para que al resultado se le pueda seguir aplicando una suma , resta , division o multiplicacion? Me explico? Saludos!
program calculadora;
var
number1, number2, resultado : real;
funciones: char;
begin
Writeln('Este programa es una calculadora');
Writeln('Inserte el primer numero : '); readln(number1);
Writeln('Inserte el segundo numero : '); readln(number2);
Write('Que desea hacer con estos numeros? : sumar(+) , multiplicar(*) , dividir(/) , restar(-) ');
Readln(funciones);
case (funciones) of
'+' : resultado:=number1+number2;
'-' : resultado:= number1-number2;
'/' : resultado:= number1/number2;
'*' : resultado:= number1*number2;
else Writeln('No se puede realizar esta operacion');
end;
Writeln('El resultado es: ' , resultado) ;
readln
end.
agrega un ciclo(un while talez?) y mientras no salga opera sobre resultado :P
seria como agregar un bloque donde preguntas si seguir operando, y si sigue entra en un while en el cual, mientras no salga, pide un numero, este unico numero sea operado con el resultado :P
saludos
pd: te aconsejo no mezclar ingles y español en tu programa xD number y resultado? en fin :P