Mudanças entre as edições de "Programação para Redes de Computadores (técnico) (diário 2013-1)"
Ir para navegação
Ir para pesquisar
(→08/04) |
(→08/04) |
||
Linha 39: | Linha 39: | ||
==08/04== | ==08/04== | ||
− | E se todas as opções | + | E se todas as opções forem variáveis? |
<syntaxhighlight lang=c> | <syntaxhighlight lang=c> | ||
inicio | inicio |
Edição das 07h40min de 11 de abril de 2013
Aulas
01/04
Problema: saber o valor final de parcelamento (1 +3) a 2% de juros.
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
08/04
E se todas as opções forem variáveis?
inicio
escrever "Por favor, informe o valor da geladeira: "
real valorGeladeira
ler valorGeladeira
escrever "Deseja pagar a entrada? S ou N"
texto pagarEntrada
ler pagarEntrada
real entrada
se (pagarEntrada = "N" ou pagarEntrada = "n") entao
entrada<-0
senao
escrever "Agora, informe o valor da entrada: "
ler entrada
fimse
escrever "Valor de juros: "
real valorJuros
ler valorJuros
escrever "Quantidade de parcelas: "
real qtdParcelas
ler qtdParcelas
real somatorio
real parcela
parcela <- (valorGeladeira - entrada) / qtdParcelas
inteiro mes
para mes de 1 ate qtdParcelas passo 1
parcela <- parcela * (1 + valorJuros * 0.01)
somatorio <- somatorio + parcela
proximo
escrever "Ao final, a geladeira custou ", entrada + somatorio, "."
escrever "\nForam ", qtdParcelas, " parcelas de ", somatorio / qtdParcelas, " cada."
fim