Multipla Escolha

algoritmo "semnome"
// Função : Calculo do preço final do combustivel. A vista 10% de desconto.
// a prazo 2% de juros por parcela.
// Autor :
// Data : 21/11/2014
// Seção de Declarações
var

nome:caracter
litros:real
preco:real
pagm:inteiro
precoreal:real
desconto:real
parcela:inteiro
juro:real

inicio
escreval ("Insira o nome do cliente")
leia  (nome)
limpatela
escreval ("Quantos litros foram abastecido?")
leia (litros)
limpatela
escreval ("Qual o preço do litro do combustivel?")
leia (preco)
limpatela
escreval ("Digite 1 para pagamento a vista,digite 2 para a prazo")
leia (pagm)
enquanto pagm >2 faca
escreval ("Opção invalida!Digite 1 ou 2!")
leia (pagm)
fimenquanto
se pagm=1 entao
escreval ("Pagamento a vista selecionado.10% de desconto")
escreval (" ")
precoreal<- (litros*preco)
desconto <- (10/100)
escreval (nome," Você obteve um total de R$",precoreal*desconto," de desconto")
escreval ("Total a pagar é: R$",precoreal-(precoreal*desconto))
senao
escreval ("Pagamento a prazo selecionado")
escreval ("")
escreval ("Infome o N° de parcela(s)")
leia(parcela)
precoreal<- (litros*preco)
juro<- (2/100)*parcela
escreval (" O Total a pagar é de: R$",(precoreal*juro)+precoreal)
escreval ("Sendo R$",precoreal*juro," de juros")

fimse
fimalgoritmo