Escreva um algoritmo que implemente uma calculadora de quatro operações. O algoritmo lê o primeiro operando, a operação (algum dos quatro símbolos: “x”, “-“, “*”, ou “/”) e o segundo operando. Ele deve escrever 1º operando operação 2º operando = resultado. Por exemplo, se os valores lidos foram 4, “*” e 5, o algoritmo deve escrever 4*5 = 20.

  algoritmo "Cálculo da calculadora"
  var
    oper:literal
    oper1,oper2,calc1,calc2,calc3,calc4:numerico
  inicio
    escreval("Cálculo da calculadora")
    escreva("Digite o primeiro operando  = ")
    leia(oper1)
    escreva("Digite o primeiro operando  = ")
    leia(oper1)
    escreva("Digite a operação (+,-,*,/) = ")
   leia (oper)
   escreva("DIgite o segundo  operando  = ")
   leia(oper2)
   se oper= ("+") entao
    calc1 <- ((oper1)+(oper2))
    escreva(oper1 , oper ,oper2," = ",calc1)
   senao
     se oper= ("-") entao
      calc2 <- ((oper1)-(oper2))
      escreva(oper1,oper,oper2," = ",calc2)
     senao
       se oper=("*") entao
        calc3 <- ((oper1)*(oper2))
        escreva(oper1,oper,oper2," = ",calc3)
       senao
         se oper=("/") entao
          calc4 <- ((oper1)/(oper2))
          escreva(oper1,oper,oper2," = ",calc4)
         senao       
          escreva("Operação não correspondente, tente + , - , * ou /  ")
         fimse
       fimse
     fimse
   fimse
 fimalgoritmo