Algoritmo que permite la evaluación de tablas de Verdad

Algoritmo que permite la evaluación de tablas de Verdad

Proceso Algo_030_Con_dobles_Tablas_Verdad

 //VAriables

 Prop1 <- "";
 Prop2 <- "";
 Resultado <- "";
 V <- "VERDADERA";
 F <- "FALSA";
 Conectivo <- "";


 //Captura de los datos
 Escribir "Programa que evalúa dos valores de verdad,, utilizando conectivos lógicos ( Y ó O ) ( & ó |)";

 Escribir "Elija el tipo de Tabla de verdad, Conectivo Y o Conectivo O ";
 Leer Conectivo;


 Escribir "Introduce el valor de verdad (Falso o Verdadero) para cada Proposición";
 Escribir "Introduce el valor de la Proposición 1: ";
 Leer Prop1;
 Escribir "Introduce el valor de la Proposición 2: ";
 Leer Prop2;
 
 //Proceso de comparación
 Si Conectivo = "Y" Entonces


  si Prop1 = V & Prop2 = V Entonces
   Resultado <- "La proposición es verdadera";
  Sino
   SI Prop1 = V & Prop2 = F Entonces
    Resultado <- "La proposición es falsa";
   SINO
    SI Prop1 = F & Prop2 = V Entonces
     Resultado <- "La proposición es falsa";
    Sino
     SI Prop1 = F & Prop2 = F Entonces
      Resultado <- "La proposición es falsa";
     FinSi
    FinSi
   FinSi
  
  FinSi
 
 Sino
  Si Conectivo = "O" Entonces
 
   si Prop1 = V | Prop2 = V Entonces
    Resultado <- "La proposición es verdadera";
   Sino
    SI Prop1 = V | Prop2 = F Entonces
     Resultado <- "La proposición es Verdadera";
    SINO
     SI Prop1 = F | Prop2 = V Entonces
      Resultado <- "La proposición es Verdadera";
     Sino
      SI Prop1 = F | Prop2 = F Entonces
       Resultado <- "La proposición es falsa";
      FinSi
     FinSi
    FinSi
  
   FinSi
  Sino
   Escribir "El valor ingresado es incorrecto.";
  finsi
 finsi

 Escribir "El resultado de evaluar la expresión es: ",Resultado;


FinProceso