Resolucion de Ecuaciones de Segundo grado en Pseint: Algoritmo con complejas Paso a Paso

Aprender a resolver una ecuación de segundo grado mediante algoritmos condicionales en PSeInt es un paso fundamental para dominar la programación estructurada. En esta guía completa y práctica, aprenderás a calcular las raíces reales y complejas (números imaginarios) de una ecuación cuadrática, aplicando de forma rigurosa la jerarquía de operaciones matemáticas, estructuras de control compuestas y nuevos comandos clave del simulador.

Ecuación Cuadrática y Fórmula General

Antes de pasar al diseño del pseudocódigo y diagrama de flujo, es imprescindible comprender la base matemática detrás del problema. Una ecuación de segundo grado o ecuación cuadrática tiene la forma general estándar:

\[ax^2 + bx + c = 0\]

Donde \(a\), \(b\) y \(c\) representan los coeficientes numéricos (\(a \neq 0\)), y \(x\) es la variable o incógnita a determinar.

       -b ± √(b² - 4ac)
x =  -------------------
             2a

Determinación del Discriminante y Tipos de Solución

La clave para estructurar la lógica condicional del algoritmo radica en evaluar el término interno de la raíz cuadrada, denominado discriminante (\(\Delta\)):

\[\Delta = b^2 - 4ac\]

Si \(\Delta > 0\): La ecuación posee dos soluciones o raíces reales y distintas (\(X_1 \neq X_2\)).
Si \(\Delta = 0\): La ecuación posee única raíz real doble (\(X_1 = X_2\)).
Si \(\Delta < 0\): La ecuación posee soluciones en el plano de los números complejos o imaginarios, compuestas por una parte real y una parte imaginaria.

Implementación en PSeInt: Estructuras Condicionales y Entradas de Datos

Para que este programa funcione correctamente en móviles o computadoras, empleamos comandos de interfaz limpios como Sin Saltar y Borrar Pantalla. Estos comandos optimizan la salida visual manteniendo la interacción ágil para el usuario.

Pseudocódigo Completo en PSeInt

Algoritmo Ec_Cuadratica_v1
    // DECLARACIÓN DE VARIABLES
    Definir A, B, C, X1, X2, disc Como Real
    Definir partereal, parteimaginario, r Como Real
    
    Escribir '==================================================='
    Escribir '  RESOLUCIÓN DE ECUACIONES DE SEGUNDO GRADO (2DO)  '
    Escribir '==================================================='
    
    // ENTRADA DE DATOS CON INTERFAZ LIMPIA
    Escribir 'Ecuación: AX^2 + BX + C = 0'
    Escribir ''
    Escribir 'Ingrese el valor de A: ' Sin Saltar
    Leer A
    Borrar Pantalla
    
    Escribir A, 'X^2 + BX + C = 0'
    Escribir ''
    Escribir 'Ingrese el valor de B: ' Sin Saltar
    Leer B
    Borrar Pantalla
    
    Escribir A, 'X^2 + ', B, 'X + C = 0'
    Escribir ''
    Escribir 'Ingrese el valor de C: ' Sin Saltar
    Leer C
    Borrar Pantalla
    
    Escribir 'Ecuación a resolver: ', A, 'X^2 + ', B, 'X + ', C, ' = 0'
    Escribir ''
    
    // CÁLCULO DEL DISCRIMINANTE
    disc <- (B^2) - 4 * (A * C)
    
    // ESTRUCTURA CONDICIONAL ANIDADA
    Si disc > 0 Entonces
        // CASO 1: RAÍCES REALES DISTINTAS
        X1 <- ((-B) + rc(disc)) / (2 * A)
        X2 <- ((-B) - rc(disc)) / (2 * A)
        
        Escribir '-> Tipo de Raíz: Reales y Distintas'
        Escribir 'Raíz 1 (X1): ', X1
        Escribir 'Raíz 2 (X2): ', X2
    SiNo
        Si disc < 0 Entonces
            // CASO 2: RAÍCES COMPLEJAS / IMAGINARIAS
            partereal <- (-B) / (2 * A)
            parteimaginario <- rc(abs(disc)) / (2 * A)
            
            Escribir '-> Tipo de Raíz: Complejas o Imaginarias'
            Escribir 'Raíz 1 (X1): ', partereal, ' + ', parteimaginario, ' i'
            Escribir 'Raíz 2 (X2): ', partereal, ' - ', parteimaginario, ' i'
        SiNo
            // CASO 3: RAÍZ ÚNICA REAL
            r <- (-B) / (2 * A)
            
            Escribir '-> Tipo de Raíz: Única Raíz Real'
            Escribir 'La raíz única es X: ', r
        FinSi
    FinSi
    
    Escribir ''
    Escribir 'Discriminante evaluado (Delta): ', disc
FinAlgoritmo

Diagrama de Flujo del Algoritmo Cuadrático

El diagrama de flujo permite visualizar cómo la estructura lógica decide qué camino seguir en función del signo de la discriminante (disc).

                 [ Inicio: Ec_Cuadratica_v1 ]
                              │
               [ Lectura de Coeficientes A, B, C ]
                              │
               [ Calcular disc = (B^2) - 4*A*C ]
                              │
                       /             \
             ¿disc > 0?               ¿disc < 0?
            /          \             /          \
        (Sí)            (No)     (Sí)            (No)
         │                │       │                │
[Raíces Reales] ──────────┴───────┘          [Raíz Única]
 X1, X2 calculados                   partereal, parteimaginario
                                              calculados
         │                                         │
         └────────────────────┬────────────────────┘
                              │
                   [ Impresión de Resultados ]
                              │
                  [ Fin del Algoritmo ]

Explicación Detallada del Código y Comandos Especiales

rc() y abs(): La función rc() obtiene la raíz cuadrada en PSeInt. Para calcular la parte imaginaria cuando \(\Delta < 0\), usamos abs() para extraer el valor absoluto del discriminante negativo y evitar un error en tiempo de ejecución.
Sin Saltar: Mantiene el cursor en la misma línea del mensaje de texto enviado por Escribir, permitiendo ingresar el número justo al lado de la consulta.
Borrar Pantalla: Limpia los datos anteriores en la consola antes de mostrar la siguiente instrucción, garantizando un aspecto profesional de la aplicación.