Algoritmo AreaOperacion

Algoritmo AreaOperacion

Definir expresion, elemento, continuar Como Cadena

expresion <- ""
continuar <- "S"

Mientras continuar = "S" O continuar = "s" Hacer
	
	Escribir "Expresion actual: ", expresion
	Escribir "Ingrese un elemento:"
	Leer elemento
	
	Si elemento = "" Entonces
		
		Escribir "Error: no se ingreso ningun elemento."
		Escribir "La expresion no fue modificada."
		
	SiNo
		
		expresion <- expresion + elemento
		
		Escribir "Elemento agregado correctamente."
		Escribir "Nueva expresion: ", expresion
		
	FinSi
	
	Escribir "¿Desea ingresar otro elemento? (S/N):"
	Leer continuar
	
	Si continuar <> "S" Y continuar <> "s" Y continuar <> "N" Y continuar <> "n" Entonces
		
		Escribir "Error: opcion no valida. Se finalizara el ingreso."
		continuar <- "N"
		
	FinSi
	
FinMientras

FinAlgoritmo