Uma agência bancária possui vários clientes que podem fazer investimentos com
rendimentos mensais, conforme a tabela a seguir:
tipo descrição rendimento mensal
1 poupança 1,5%
2 poupança pulus 2%
3 fundos de renda fixa 4%
Faça um programa que receba um valor( é o montante ), o tipo de investimento escolhido, e uma
quantidade de meses a ser aplicado. Calcule e mostre o valor do lucro durante o período e o
montante total ao final. A leitura terminará quando o código do cliente digitado for menor ou
igual a zero.
OBs.
O montante é o valor aplicado.
Calculo do montante : mt + (mt * 1.5 /100)
Você deve usar 2 comandos de repetição e um comando escolha
Dentro do comando escolha você de usar um comando de repetição
OBS: VISUALG
Soluções para a tarefa
Resposta:
Algoritmo "Simulador de investimento"
// Mickael Cândido
// FPB - Gestão TI
Var
mt, valor, lucro: real
codCli, Meses, op: inteiro
Inicio
escreval("Simulador de investimento")
escreval()
escreva("Informe o codigo do cliente: ")
leia(codCli)
repita
repita
escreval()
escreva("Informe o valor aplicado: ")
leia(valor)
ate (valor > 0)
repita
limpatela
escreval("Simulador de investimento")
escreval("")
escreval("Valor aplicado: R$", valor)
escreval("")
escreval("1 - Poupança")
escreval("2 - Poupança Plus")
escreval("3 - Fundos de renda Fixa")
escreval("")
escreva("Escolha um rendimento: ")
leia(op)
ate ((op = 1) ou (op = 2) ou (op = 3))
escreval()
escreva("Informe o quantidade de meses aplicados: ")
leia(Meses)
escreval()
mt <- valor
escolha op
caso 1
para Meses de 1 ate Meses passo 1 faca
mt <- mt + (mt * 0.015)
fimpara
caso 2
para Meses de 1 ate Meses passo 1 faca
mt <- mt + (mt * 0.02)
fimpara
caso 3
para Meses de 1 ate Meses passo 1 faca
mt <- mt + (mt * 0.04)
fimpara
fimescolha
lucro <- mt - valor
limpatela
escreval("----------------------------------------------")
escreval(" Valor aplicado: R$" ,valor)
escreval(" Montante após", Meses, " meses: R$ ", mt :6:2)
escreval(" Lucro de R$ ", lucro :3:2)
escreval("----------------------------------------------")
escreval()
escreval(" * Nova consulta informe o codigo do cliente")
escreval(" * Sair digite 0")
leia(codCli)
ate (codCli <= 0)
Fimalgoritmo
Explicação: