Algoritmo de Calculadora Básica con Menú en PSeInt (Guía 2026)

En lugar de escribir múltiples Si... Entonces... SiNo... anidados, la estructura Segun nos permite evaluar una variable (la opción del menú) y saltar directamente al bloque de código correspondiente (Caso 1, Caso 2, etc.). Es más limpia y rápida.

Una calculadora robusta no puede fallar. En la división, el denominador nunca puede ser cero. Aprenderemos a usar condicionales internos para prevenir que el programa se cuelgue (Crash) si el usuario intenta dividir entre 0.

Algoritmo CalculadoraBasica
    // 1. Definición de Variables
    Definir num1, num2, resultado Como Real;
    Definir opcion Como Entero;
    
    // 2. Entrada de Datos (Los números)
    Escribir "=== CALCULADORA PSeInt ===";
    Escribir "Ingrese el primer número:";
    Leer num1;
    Escribir "Ingrese el segundo número:";
    Leer num2;
    
    // 3. Despliegue del Menú
    Escribir "--------------------------";
    Escribir "Seleccione una operación:";
    Escribir "1. Sumar (+)";
    Escribir "2. Restar (-)";
    Escribir "3. Multiplicar (*)";
    Escribir "4. Dividir (/)";
    Escribir "--------------------------";
    Leer opcion;
    
    // 4. Proceso con estructura SEGUN (Switch)
    Segun opcion Hacer
        1:
            resultado <- num1 + num2;
            Escribir "El resultado de la Suma es: ", resultado;
        2:
            resultado <- num1 - num2;
            Escribir "El resultado de la Resta es: ", resultado;
        3:
            resultado <- num1 * num2;
            Escribir "El resultado de la Multiplicación es: ", resultado;
        4:
            // Validación CRÍTICA para división
            Si num2 <> 0 Entonces
                resultado <- num1 / num2;
                Escribir "El resultado de la División es: ", resultado;
            SiNo
                Escribir "ERROR: No se puede dividir por CERO.";
            FinSi
        De Otro Modo:
            Escribir "ERROR: Opción no válida. Elija del 1 al 4.";
    FinSegun
    
FinAlgoritmo

En matemáticas, dividir por cero es indefinido. En informática, hace que el programa termine abruptamente con error. Siempre debes envolver la división en un Si n2 <> 0.

Si el usuario escribe "5" o "9" en el menú, tu programa no hará nada si no incluyes la cláusula De Otro Modo. Es vital para dar retroalimentación sobre opciones inválidas.

Algoritmo CalculadoraPro
    Definir n1, n2, res Como Real;
    Definir op Como Entero;
    
    Repetir
        Borrar Pantalla; // Limpia la consola para que se vea ordenado
        Escribir "=== MENÚ PRINCIPAL ===";
        Escribir "1. Sumar";
        Escribir "2. Restar";
        Escribir "3. Multiplicar";
        Escribir "4. Dividir";
        Escribir "5. SALIR";
        Escribir "Elija una opción:";
        Leer op;
        
        Si op >= 1 Y op <= 4 Entonces
            Escribir "Ingrese primer número:";
            Leer n1;
            Escribir "Ingrese segundo número:";
            Leer n2;
        FinSi
        
        Segun op Hacer
            1: Escribir "Resultado: ", n1 + n2;
            2: Escribir "Resultado: ", n1 - n2;
            3: Escribir "Resultado: ", n1 * n2;
            4: 
                Si n2 <> 0 Entonces
                    Escribir "Resultado: ", n1 / n2;
                SiNo
                    Escribir "ERROR: División por cero.";
                FinSi
            5: Escribir "Saliendo del sistema...";
            De Otro Modo: Escribir "Opción inválida.";
        FinSegun
        
        Escribir "Presione Enter para continuar...";
        Leer n1; // Pausa simple
        
    Hasta Que op = 5
    
FinAlgoritmo