pseint/calculadora at main · simplerandomuser/pseint · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
Algoritmo Calculadora
	Definir resultado,num1,num2,operacion como real
	operacion = 10
	resultado = 0
	Mientras operacion <> 0 Hacer
		Escribir "Calculadora con operaciones básicas"
		Escribir "Escribe el primer número"
		leer num1
		Escribir "Escribe el segundo número"
		leer num2

		Escribir ""
		Escribir "1 = Suma"
		Escribir "2 = Resta"
		Escribir "3 = Multiplicacion"
		Escribir "4 = Division"
		Escribir "Salir con cualquier otro numero"
		Escribir ""
		Escribir "Elige una opcion"
		leer operacion
		Segun operacion Hacer
			1:
				resultado = num1+num2
				Escribir "La suma de ",num1," + ",num2," = ",resultado
			2:
				resultado = num1-num2
				Escribir "La resta de ",num1," - ",num2," = ",resultado
			3:
				resultado = num1*num2
				Escribir "La multiplicacion de ",num1," x ",num2," = ",resultado
			4:
				resultado = num1/num2
				Escribir "La division de ",num1," / ",num2," = ",resultado
			De Otro Modo:
				Escribir "Finalizado con éxito."
				operacion = 0
		Fin Segun
	FinMientras
FinAlgoritmo