Calculadora usando condicionais (Calculo em tempo real) em Portugol usando VisualG

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

Algoritmo "Calculadora em condicionais"
// 
// 
// Descrição : Aqui você descreve o que o programa faz! (função)
// Autor(a) : Nome do(a) aluno(a)
// Data atual : 21/03/2018
Var
// Seção de Declarações das variáveis 
numero1:real
numero2:real
resultado:real
escolhas:caracter
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc... 
escolhas <- "nada"
enquanto escolhas <> "=" faca
se escolhas = "nada" entao
escreva ("Digite um numero para as operacoes:")
leia (numero1)
escreval ("Escolha uma das operacoes:")
escreval ("Adicao +, Subtracao -, Multiplicacao *, Divisao / e Mostrar =")
leia (escolhas)
fimse
se escolhas = "+" entao
escreva ("Digite um numero para as operacoes:")
leia (numero2)
resultado <- numero1 + numero2
numero1 <- resultado
fimse
se escolhas = "-" entao
escreva ("Digite um numero para as operacoes:")
leia (numero2)
resultado <- numero1 - numero2
numero1 <- resultado
fimse
se escolhas = "*" entao
escreva ("Digite um numero para as operacoes:")
leia (numero2)
resultado <- numero1 * numero2
numero1 <- resultado
fimse
se escolhas = "/" entao
escreva ("Digite um numero para as operacoes:")
leia (numero2)
resultado <- numero1 / numero2
numero1 <- resultado
fimse
escreval ("Escolha uma das operacoes:")
escreval ("Adicao +, Subtracao -, Multiplicacao *, Divisao / e Mostrar =")
escreval ("Resultado atual:", resultado)
leia (escolhas)
fimenquanto
escreval ("Resultado final: ", resultado)
Fimalgoritmo