Exercicio 5.2c 
 Elabore um algoritmo que calcule o que deve ser pago por um produto, considerando o preço normal da etiqueta e a escolha da condição de pagamento. Utilize os códigos da tabela a seguir para ler qual a condição de pagamento escolhida e efetuar o calculo adequado

  1  - A vista, recebe 10% desconto
  2   -No cartão, recebe 5% desconto
  3   - Em duas vezes, preço normal 
  4 – Em três vezes, preço normal mais juros 




algoritmo "5.2c"
// Autor : Beatriz Mello
// Data : 18/03/2013
var
compra: real
pag: caractere
juros: real
inicio
escreva ("Preco da mercadoria:")
leia (compra)
escreva ("-------------------------------------------")
escreval
escreva ("Formas de pagamento")
escreval
escreva ("A = A vista, 10% de disconto")
escreval
escreva ("C = no cartão, 5% de disconto")
escreval
escreva ("2 = Em 2x, sem disconto")
escreval
escreva ("3 = Em 3x, 5% de juros")
escreval
escreva ("------------------------------------------")
escreval
escreva ("Forma de pagamento:")
leia (pag)
escreva ("------------------------------------------")
escreval
escolha (pag)
        caso ("A")
             escreva ("Você escolheu a forma de pagamento à vista")
             escreval
             escreva ("Valor total da compra:")
             escreva (compra," - 10% =",(compra*0.9))
             escreval
             escreval ("Total a pagar:",(compra*0.9))
        caso ("C")
             escreva ("Você escolheu a forma de pagamento no cartão")
             escreval
             escreva ("Valor total da compra:")
             escreva (compra," - 5% =",(compra*0.95))
             escreval
             escreval ("Total a pagar:",(compra*0.95))
        caso ("2")
             escreva ("Voce escolheu a forma de pagamento em 2x no cartão")
             escreval
             escreva ("Valor total da compra:")
             escreva (((compra)/2)," + ",((compra)/2))
             escreval
             escreval ("Total a pagar:",compra)
        caso ("3")
             escreva ("Voce escolheu a forma de pagamento em 3x no cartão")
             escreval
             escreva ("Valor total da compra:")
             escreval
             escreva (compra," + 5% ao mês =",((compra/0.95)/3)," + ",((compra/0.95)/3)," + ",((compra/0.95)/3))
             escreval
             escreva ("Total a pagar:",(((compra/0.95)/3)+((compra/0.95)/3)+((compra/0.95)/3)))
fimescolha

fimalgoritmo