Wendy Chagas

@kgin isso exatamente, eu não sabia que palavra usar jsioajiosji, mas é exatamente isso que estou tentando ainda não consegui, e muito obrigado pela ajuda também, eu abri seu código aqui no visualg e realmente desse jeito é muito mais funcional!!

<algoritmo "AP1 - Matemática Para Computação" //------------------------------------------------------------------------------ // Uma loja está vendendo uma TV com a opção de parcelamento com um desconto a // quem pagar os boletos das parcelas antes da data de vencimento. Funcionando // da seguinte forma: // // - Boletos pagos na data de vencimento, pagam o valor exato da parcela. // - Boletos pagos antes da data de vencimento, ganham um desconto de 10%. // - Boletos pagos após a data de vencimento, ganham um acréscimo de 4%. // // Lívia e Bernardo compraram uma TV cada. // // Lívia parcelou em 8 vezes, pagou as 2 primeiras parcelas na data de vencimen- // to e as demais parcelas, ela pagou antes da data. // // Bernardo parcelou em 11 vezes e pagou a primeira parcela antes da data. Mas // devido a falta de organização financeira, precisou pagar as 7 parcelas // seguintes, atrasadas. Para tentar compensar o gasto, pagou as parcelas // restantes, antes da data de vencimento. // // Sabendo que a TV tinha um custo de R$2500,00, podendo ser parcelada em 12x // sem juros, qual foi o valor pago por Lívia e por Bernardo na TV? //------------------------------------------------------------------------------ var valorProd, pagEmDia, pagAdiantado, pagAtrasado, valorPagoTv: Real op, resp: caractere parcelas: Inteiro //----------------------------------------------------------------------------- procedimento Topo() inicio escreval("----------------------------------------") escreval("Valor do produto R$", valorProd:5:2) escreval("Valor pago até o momento R$", valorPagoTv:5:2) escreval("Prestações restantes: ", parcelas) escreval("----------------------------------------") fimprocedimento //------------------------------------------------------------------------------ procedimento Menu() inicio escreval("[1] Pagou em dia") escreval("[2] Pagou atrasado") escreval("[3] Pagou adiantado") escreval("[x] Finalizar") escreva("-> ") leia(op) fimprocedimento //------------------------------------------------------------------------------ procedimento Comprador() inicio escreval("[1] Livia") escreval("[2] Bernardo") escreval() escreva("-> ") leia(resp) escolha resp caso "1" pagEmDia <- 312.50 pagAdiantado <- 281.25 pagAtrasado <- 325.00 caso "2" pagEmDia <- 227.27 pagAdiantado <- 204.55 pagAtrasado <- 236.36 fimescolha fimprocedimento //------------------------------------------------------------------------------ inicio Topo() Comprador() limpatela Topo() escreva("Valor Tv R$") leia(valorProd) escreva("Nº parcelas: ") leia(parcelas) enquanto (parcelas >= 0) faca limpatela Topo() Menu() se (op = "1") entao valorPagoTv <- valorPagoTv + pagEmDia fimse se (op = "2") entao valorPagoTv <- valorPagoTv + pagAtrasado fimse se (op = "3") entao valorPagoTv <- valorPagoTv + pagAdiantado fimse se (op = "x") entao parcelas <- 0 limpatela Topo() escreval() escreval("---------------") escreval(" Finalizando ") escreval("---------------") fimse parcelas <- parcelas - 1 fimenquanto fimalgoritmo>