[ Foro de Pascal ]

ejerc_condiciones_Case

Que tal estimados de "AprendeaProgramar" me topé con su ejercicio propuesto de su página que no puedo resolver hasta el momento y me gustaría que den la solución, estaré muy agradecido, a continuación les muestro:

"Crea un programa que pida al usuario un número, una operación (+, -, * o /) y otro número, y muestre el resultado de aplicar esa operación a esos dos números."
NOTA: Estoy utilizando FreePascal

Pides primer número, símbolo, segundo número usando tres "readLn".

Luego usas cuatro "if" encadenados o un "case" para, según sea el símbolo, mostrar el resultado de una operación u otra.

Muestranos cómo ha quedado tu intento, y te ayudaremos con lo que no hayas conseguido.

Compañero Nacho, muchas gracias por la guía. Pude resolverlo. Saludos desde Perú:

program casoCase2;
var num,num2:integer;
    ope:char;

begin
    writeln();
    writeln('Introduzca un número entero:');
    readln(num);
    writeln('Introduzca cualquiera de las 4 operaciones básicas');
    readln(ope);
    writeln('Introduzca ahora otro número entero para ya operar');
    readln(num2);
    case ope of
    '+': writeln('El resultado es: ',num + num2);
    '-': writeln('El resultado es: ',num - num2);
    '*': writeln('El resultado es: ',num * num2);
    '/': writeln('El resultado es: ',num div num2);
    else
         writeln('No ingresó ni uno de los 4 operadores mencionados');
         end;
end.

Exactamente, esa es la idea, está perfecto así.