Leonardo guzen

Fiz o meu assim, caso ajude os colegas.

		inteiro n1, n2, operador

		escreva("\n ----CALCULADORA----")
		escreva("\n 1 = + Adição")
		escreva("\n 2 = - Subtração")
		escreva("\n 3 = * Multiplicação")
		escreva("\n 4 = / Divisão")
		escreva("\n -------------------")

		escreva("\n Escolha uma Opção: ")
		leia(operador)
		escreva("\n Escolha um numero: ")
		leia(n1)
		escreva("\n Escolha outro numero: ")
		leia(n2)
		
		escolha (operador){
			caso 1:
			escreva("\n RESULTADO: ", (n1+n2))
			pare

			caso 2:
			escreva("\n RESULTADO: ", (n1-n2))
			pare

			caso 3:
			escreva("\n RESULTADO: ", (n1*n2))
			pare

			caso 4:
			escreva("\n RESULTADO: ", (n1/n2))
			pare

			caso contrario:
			escreva("\n Opção Invalida")
			pare
			}