Exemplo - Escolha Caso

algoritmo "Calculadora"
// Função : Escolher casos de uma calculadora
// Autor :  Aj Garcia
// Data : 14/09/2015
// Seção de Declarações 
var
Codigo: inteiro
Numero1, Numero2: real
inicio
// Seção de Comandos
Escreval("Escreva o Primeiro Número: ")
leia(Numero1)
Escreval("Escreva o Segundo Número: ")
leia(Numero2)
Escreval("Digite 1 para somar ou Digite 2 para subtrair")
leia(Codigo)
Escolha Codigo
Caso 1
Escreval("O resultado da soma é: ",Numero1+Numero2)
Caso 2
Escreval("O resultado da subtração é: ",Numero1-Numero2)
OutroCaso
Escreval("Não existe essa operação")
fimescolha
fimalgoritmo