Calculadora no Visual Cobra: operações e divisão por zero

Este exemplo em Visual Cobra aplica menu, leitura, conversão numérica e decisões com se/senaose/senao em um caso real de calculadora.

escreva("=== CALCULADORA SIMPLES ===")
escreva("[1] Soma | [2] Subtração | [3] Multiplicação | [4] Divisão")
op = leia()

escreva("Digite o primeiro valor: ", end="")
n1 = real(leia())
escreva("Digite o segundo valor: ", end="")
n2 = real(leia())

se op == "1":
    res = n1 + n2
    escreva("Resultado: ", res)
senaose op == "2":
    res = n1 - n2
    escreva("Resultado: ", res)
senaose op == "3":
    res = n1 * n2
    escreva("Resultado: ", res)
senaose op == "4":
    se n2 == 0:
        escreva("ERRO: Divisão por zero não é permitida")
    senao:
        res = n1 / n2
        escreva("Resultado: ", res)
senao:
    escreva("ERRO: Operador inválido")

enquanto Verdadeiro:
    escreva("\n" * 30)
    escreva("=== CALCULADORA INFINITA ===")
    escreva("[1] Somar | [2] Diminuir | [0] FECHAR PROGRAMA")
    op = leia("Escolha uma opção: ")

    se op == "0":
        pare

    se op == "1" ou op == "2":
        n1 = real(leia("Primeiro valor: "))
        n2 = real(leia("Segundo valor: "))

        se op == "1":
            res = n1 + n2
        senao:
            res = n1 - n2

        escreva("Resultado:", res)
    senao:
        escreva("Opção inválida! Use 1, 2 ou 0.")

    leia("Aperte Enter para continuar...")

escreva("Sistema Finalizado. Adeus!")