rodando programa
    {
        funcao inicio()
        {
            cadeia nome
            real val, total
            inteiro quant
            caracter opcao = 'f'
            enquanto(opcao !='n') {
                escreva("digite o nome do produto")
                leia(nome)
                escreva("digite a quantidade do produto")
                leia(quant)
                escreva("digite o valor unitario")
                leia(val)
                total = quant * val
                escreva("O total da compra foi", total)
                escreva("deseja digitar mais algum produto? (s/n)")
                leia(opcao)
            }
        }
    }

rodando programa
    {
        funcao inicio()
        {
            cadeia nome
            real val, total, totalGeral
            inteiro quant
            caracter opcao = 'f'
            enquanto(opcao !='n') {
                escreva("digite o nome do produto")
                leia(nome)
                escreva("digite a quantidade do produto")
                leia(quant)
                escreva("digite o valor unitario")
                leia(val)
                total = quant * val
                totalGeral = totalGeral + total
                escreva("O total da compra foi", total)
                escreva("deseja digitar mais algum produto? (s/n)")
                leia(opcao)
            }
        escreva("Soma dos totais:", totalGeral)
        }
    }