Algoritmo para Intercambiar Variables (Swap) en PSeInt (Guía 2026)

Imagina que tienes un vaso con Jugo (A) y otro con Agua (B). Si viertes el agua directamente en el vaso del jugo, el jugo se pierde (se derrama o se mezcla). En programación, hacer A <- B destruye instantáneamente el valor original de A.

Para intercambiar los líquidos sin perderlos, necesitas un tercer vaso vacío (Auxiliar). 1. Viertes el Jugo (A) en el Vaso Vacío (Aux). 2. Viertes el Agua (B) en el vaso de Jugo (A). 3. Viertes el contenido del Vaso Auxiliar en el vaso de Agua (B).

Algoritmo IntercambioDeVariables
    // 1. Definición de variables
    // Necesitamos una variable 'aux' del mismo tipo que las originales
    Definir valorA, valorB, aux Como Entero;
    
    // 2. Entrada de datos
    Escribir "--- Antes del Intercambio ---";
    Escribir "Ingrese el valor de A:";
    Leer valorA;
    Escribir "Ingrese el valor de B:";
    Leer valorB;
    
    Escribir "Original -> A vale: ", valorA, " y B vale: ", valorB;
    
    // 3. Proceso de Intercambio (Swap)
    // Paso 1: Resguardamos el valor de A en Aux
    aux <- valorA;
    
    // Paso 2: Ahora es seguro sobrescribir A con el valor de B
    valorA <- valorB;
    
    // Paso 3: Recuperamos el valor original de A (desde Aux) y lo ponemos en B
    valorB <- aux;
    
    // 4. Salida de resultados
    Escribir "";
    Escribir "--- Después del Intercambio ---";
    Escribir "Ahora -> A vale: ", valorA, " y B vale: ", valorB;
    
FinAlgoritmo

Escribir:
A <- B
B <- A
¿Qué pasa aquí? En la primera línea, A toma el valor de B. El valor original de A desaparece. En la segunda línea, B toma el valor de A (que ahora es igual a B). Resultado: Ambas variables terminan valiendo lo mismo que B originalmente.

Si A y B son Reales (decimales) pero defines aux como Entero, perderás los decimales durante el intercambio. La variable auxiliar siempre debe ser del mismo tipo que las variables que estás moviendo.

Algoritmo SwapMatematico
    Definir A, B Como Entero;
    
    A <- 50;
    B <- 20;
    
    Escribir "Inicio: A=", A, " B=", B;
    
    // Truco matemático:
    // Imaginemos que A y B son contenedores de "peso"
    
    // 1. Sumamos ambos pesos en A
    A <- A + B;  // A ahora vale 70 (50+20)
    
    // 2. Quitamos el peso original de B a la suma total
    B <- A - B;  // 70 - 20 = 50. ¡B ahora tiene el valor original de A!
    
    // 3. Quitamos el nuevo peso de B a la suma total
    A <- A - B;  // 70 - 50 = 20. ¡A ahora tiene el valor original de B!
    
    Escribir "Final: A=", A, " B=", B;
    
FinAlgoritmo