Calculadora no visualg

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

algoritmo "Calculadora"
// Função :
// Autor : CLAUDIO DO CURSO DE ADS NA FACULDADE CDL
// Data : 9/3/2017
// Seção de Declarações 
var
 A,B,C: inteiro
 X: caractere
 Y: real
inicio
 escreval ("#################################")
 escreval ("#################################")
 escreval ("##### C A L C U L A D O R A #####")
 escreval ("#################################")
 escreval ("#################################")
 ESCREVAL (" ")
 escreva ("Escreva o primeiro numero: ")
 leia(A)
 escreva ("Escreva o segundo numero: ")
 leia(B)
 escreva ("Quual Operação? ")
 leia(X)
 
 escolha X
 caso "+"
 y <- a+b
 escreva (" O resultado é: ",Y)
 
 caso "-"
 y <- a-b
 escreva ("O resultado é: ",Y)
 
 caso "*"
 y <- a*b
 escreva ("O resultado é: ",Y)
 
 caso "/"
 y <- a/b
 escreva ("O resultado é: ",Y)
 outrocaso
 escreva("Operação Invalida")
 fimescolha
 
fimalgoritmo