Algoritmo EvaluarExpresion

Algoritmo EvaluarExpresion

Definir numero1, numero2, resultado Como Real
Definir operador Como Cadena
Definir errorEvaluacion Como Logico

errorEvaluacion <- Falso

Escribir "Ingrese el primer numero:"
Leer numero1

Escribir "Ingrese el operador (+, -, *, /):"
Leer operador

Escribir "Ingrese el segundo numero:"
Leer numero2

Si operador <> "+" Y operador <> "-" Y operador <> "*" Y operador <> "/" Entonces
	
	Escribir "Error: el operador ingresado no es valido."
	Escribir "Solo se permiten +, -, * y /."
	errorEvaluacion <- Verdadero
	
FinSi

Si NO errorEvaluacion Entonces
	
	Segun operador Hacer
		
		"+":
			resultado <- numero1 + numero2
			
		"-":
			resultado <- numero1 - numero2
			
		"*":
			resultado <- numero1 * numero2
			
		"/":
			
			Si numero2 = 0 Entonces
				
				Escribir "Error: no se puede realizar una division entre cero."
				Escribir "La operacion fue cancelada y no se genero un resultado incorrecto."
				
				errorEvaluacion <- Verdadero
				
			SiNo
				
				resultado <- numero1 / numero2
				
			FinSi
			
	FinSegun
	
FinSi

Si NO errorEvaluacion Entonces
	
	Escribir "Resultado: ", numero1, " ", operador, " ", numero2, " = ", resultado
	
FinSi

FinAlgoritmo