Para ser sincero, eu tive bastante dificuldades nesse desafio, tanto quanto nos anteriores. Estou aprendendo agora a fazer essas coisas e tive um pequeno contato com Portugol no Gustavo Guanabara, que me ajudou a lembrar de algumas coisas que tive até agora no curso, mas ainda me frustrei por não conseguir fazer sozinho. Pedi ajuda um pouco à Luri, sinto-me mal por não conseguir fazer algo assim, que todos chamam de "fácil de fazer" e ainda sim acho que não ficou muito bom..
Inicio
total = 0
Escreva("Digite o valor das despesas (ou 0 para finalizar): ")
leia (despesaAtual)
enquanto (despesaAtual <> 0) faca
total = total + despesaAtual
escreva("Digitem o valor da proxima despesa (ou 0 para finalizar:) ")
leia (despesaAtual)
FimEnquanto
Escreva("O total gasto é: ", total)
fim