Proceso sin_titulo
Escribir "*********************************************";
Escribir "(1) Suma de dos numeros";
Escribir "(2) Resta de dos numeros";
Escribir "(3) Multiplicacion de dos numeros";
Escribir "*********************************************";
Escribir "Ingresa el primer numero";
Leer a;
Escribir "Ingresa el segundo numero";
Leer b;
Escribir "Que operacion deceas hacer";
Leer n;
Segun n Hacer
1:
Escribir "Suma de dos numeros";
r<-a+b
Escribir a,"+",b,"=",r;
2:
Escribir "Resta de dos numeros";
r<-a-b
Escribir a,"-",b,"=",r;
3:
Escribir "Multiplicacion de dos numeros";
r<-a*b
Escribir a,"*",b,"=",r;
FinSegun
FinProceso