Programação para Redes de Computadores (técnico) (diário 2013-1)
Aulas
01/04
inicio
// Problema: pagamento de uma geladeira, comprada a prazo em
// 1 + 3 x com juros de 2% ao mês.
escrever "Por favor, informe o valor da geladeira: "
real valorGeladeira
ler valorGeladeira
// 1) Saber quanto é o valor de entrada.
escrever "Agora, informe o valor da entrada: "
real entrada
ler entrada
// 2) Deduzir o valor de entrada do valor total, e depois dividir por 3. Isso
// dará o valor da parcela sem juro. Aplicar, no segundo mês, já o juro de 2%.
real parcela
parcela <- (((valorGeladeira - entrada) / 3) * 1.02)
// 3) No terceiro mês, aplicar o mesmo juro sobre o valor do mês anterior;
// ou seja, juro composto.
real parcela2
parcela2 <- (parcela * 1.02)
// 4) Repetir o processo no quarto mês.
real parcela3
parcela3 <- (parcela2 * 1.02)
// 5) Somar tudo e ver o prejuízo.
real somatorio
somatorio <- entrada + parcela + parcela2 + parcela3
escrever "Ao final, a geladeira custou ", somatorio, "."
fim
</syntaxhighlight>