Crear menú de opciones PSeInt
Hay gran variedad de aplicaciones de consolas o CLI (Command Line Interface) por sus
siglas en ingles; en modo de texto que requieren de una forma de efectuar tareas
múltiples sin tener que estar abriendo y cerrando una aplicación cada que se termina de
ejecutar, por tal motivo se crean los menús y/o submenús de opciones.
Hoy les vengo a mostrar un sencillo ejemplo en PSeInt de como implementar un
pequeño menú de opciones básicas de operaciones matemáticas (suma, resta,
multiplicación y división de dos números).
Screenshot:
Algoritmo:
Proceso MenuPrincipal
Definir op Como Entero;
op<-0;
Repetir
Limpiar Pantalla;
menu();
leer op;
Segun op Hacer
1:
operar(op);
2:
operar(op);
3:
operar(op);
4:
operar(op);
De Otro Modo:
Escribir "FIN...";
FinSegun
Hasta Que (op<1 || op>4);
FinProceso
SubProceso menu()
Escribir "1.- SUMA";
Escribir "2.- RESTA";
Escribir "3.- MULTIPLICACIÓN";
Escribir "4.- DIVISIÓN";
Escribir "5.- SALIR";
Escribir "";
Escribir "OPCIÓN: ";
FinSubProceso
SubProceso operar(opdr)
Definir op1,op2 como Real;
Escribir "operando 1:";
leer op1;
Escribir "operando 2:";
leer op2;
Segun opdr Hacer
1:
op1<-op1+op2;
2:
op1<-op1-op2;
3:
op1<-op1*op2;
4:
op1<-op1/op2;
De Otro Modo:
FinSegun
Escribir "Resultado: ",op1;
Esperar Tecla;
FinSubProceso