Desafio Cauculadora de despesas

Esse algoritmo serve para somar várias despesas sem precisar saber antecipadamente quantas delas serão informadas.

Primeiro, a soma total começa em zero. Em seguida, o usuário digita o valor de uma despesa. Se o valor informado for diferente de zero, ele é adicionado à soma total. Depois disso, o sistema pede uma nova despesa e repete o mesmo processo.

Esse procedimento continua enquanto o usuário informar valores diferentes de zero. Quando o usuário digita 0, o sistema entende que não há mais despesas para registrar e encerra a entrada de dados.

Por fim, o sistema mostra na tela o valor total de todas as despesas somadas. Dessa forma, o usuário pode informar quantas despesas quiser, e o programa só termina quando receber o valor zero.

Algoritmo "Soma_Despesas"

Var
valor, soma : Real

Inicio
soma <- 0

Escreva("Digite o valor da despesa (0 para encerrar): ")
Leia(valor)

Enquanto valor <> 0 faca
soma <- soma + valor

  Escreva("Digite o valor da despesa (0 para encerrar): ")
  Leia(valor)

FimEnquanto

Escreva("Soma total das despesas: ", soma)

FimAlgoritmo

Olá! Como vai?

Gostei da forma como você explicou o funcionamento do algoritmo passo a passo. Sua descrição deixou claro o uso da estrutura de repetição Enquanto, permitindo que o usuário informe quantas despesas desejar até digitar 0 para encerrar. Além disso, a variável soma foi utilizada corretamente para acumular os valores informados.

Uma dica interessante para o futuro é validar os dados informados pelo usuário antes de realizar operações. Veja este exemplo:


valor <- 10

Se valor > 0 Entao
   Escreva("Valor valido")
FimSe

Neste exemplo, o programa verifica se o valor digitado é maior que zero antes de continuar o processamento, ajudando a evitar entradas indesejadas.

Conte com o apoio da comunidade Alura na sua jornada. Abraços e bons estudos!

Importante

Trilhas por carreira

Carreiras de IA

Carreiras de Dados

Carreiras de Cyber

Carreiras de DevOps & Cloud

Carreiras de UX & UI

Carreiras de Mobile & Front-End

Carreiras de Back-End

Carreiras de Negócios

Cursos universitários FIAP