Exercicio 7 capitulo 3

screva um algoritmo que leia o nome de cinco clientes de uma loja e valor (em reais) que cada
um desses clientes pagou por sua compra. O algoritmo deverá escrever:
1. o valor total pago pelos cinco clientes;
2. o valor médio das compras efetuadas;
3. os nomes dos clientes que efetuaram compras superiores a 20 reais.

algoritmo "Exercicio 3.7"
// Função :
// Autor : Gustavo Quirino
// Data : 19/9/2010
// Seção de Declarações 
var
   nome1,nome2,nome3,nome4,nome5:literal
   vCli1,vCli2,vCli3,vCli4,vCli5,total,media:real
inicio
   escreval("Informe o nome do cliente 1:")
   leia(nome1)
   
   escreval("Informe o valor pago por ele:")
   leia(vCli1)
   ///
   escreval("Informe o nome do cliente 2:")
   leia(nome2)

   escreval("Informe o valor pago por ele:")
   leia(vCli2)
   ///
    escreval("Informe o nome do cliente 3:")
   leia(nome3)

   escreval("Informe o valor pago por ele:")
   leia(vCli3)
   ///
    escreval("Informe o nome do cliente 4:")
   leia(nome4)

   escreval("Informe o valor pago por ele:")
   leia(vCli4)
   ///
    escreval("Informe o nome do cliente 5:")
   leia(nome5)

   escreval("Informe o valor pago por ele:")
   leia(vCli5)
   
   total<- vCli1+vCli2+vCli3+vCli4+vCli5
   media<- total/5
   
   escreval("Nomes dos clientes que gastaram mais de R$ 20,00:")
   se (vCli1>20) entao
      escreval(nome1, " gastou R$",vCli1:5:2)
   fimse
   se (vCli2>20) entao
      escreval(nome2, " gastou R$",vCli2:5:2)
   fimse
   se (vCli3>20) entao
      escreval(nome3, " gastou R$",vCli3:5:2)
   fimse
   se (vCli4>20) entao
      escreval(nome4, " gastou R$",vCli4:5:2)
   fimse
   se (vCli5>20) entao
      escreval(nome5, " gastou R$",vCli5:5:2)
   fimse
fimalgoritmo