//5.16 – Faça um programa que receba o nome de cinco produtos e seus respectivos preços. Calcule e mostre: //A quantidade de produtos com preço inferior a R$50,00; //O nome dos produtos com preço entre R$50,00 e R$100,00; //A média dos preços dos produtos com preço superior a R$100,00.

//5.16 – Faça um programa que receba o nome de cinco produtos e seus respectivos preços. Calcule e mostre: 
//A quantidade de produtos com preço inferior a R$50,00;
//O nome dos produtos com preço entre R$50,00 e R$100,00;
//A média dos preços dos produtos com preço superior a R$100,00.

algoritmo "EXERCICIO 5.16"
// Disciplina  : [Linguagem e Lógica de programaçao]
// Professor(a): ÂNGELO DA CUNHA SÁ - FAMA MACAPÁ
// Descrição   : Aqui você descreve o que o programa faz! (função)
// Autor(a)    : Nome do(a) aluno(a)
// Data atual  : 16/11/2016
var
   // Seção de Declarações das variáveis
   NOME_PROD:VETOR [1..5] DE CARACTER
   PRECO_PROD:VETOR [1..5] DE REAL
   QTD1,QTD2,I:INTEIRO
    SOMA,MEDIA:REAL
inicio
   // Seção de Comandos, procedimento, funções, operadores, etc...
   PARA I:=1 ATE 5 FACA
      ESCREVAL("DIGITE O NOME DO ",I,"º PRODUTO")
      LEIA(NOME_PROD[I])
      ESCREVAL("DIGITE O PREÇO DO PRODUTO")
      LEIA(PRECO_PROD[I])
   FIMPARA
   //A quantidade de produtos com preço inferior a R$50,00;
   QTD1:=0
   PARA I:=1 ATE 5 FACA
      SE PRECO_PROD[I]<50 ENTAO
         QTD1:=QTD1+1
      FIMSE
   FIMPARA
   ESCREVAL
   ESCREVAL("A QUANTIDADE DE PRODUTOS MENORES QUE 50 É: ",QTD1)
   ESCREVAL
   //O nome dos produtos com preço entre R$50,00 e R$100,00;
   ESCREVAL("RELATORIO DE PRODUTOS COM PREÇO ENTRE 50 E 100")
   PARA I:=1 ATE 5 FACA
      SE ((PRECO_PROD[I]>50) E (PRECO_PROD[I]<100)) ENTAO
         ESCREVAL(NOME_PROD[I])
      FIMSE
   FIMPARA
   //A média dos preços dos produtos com preço superior a R$100,00.
   SOMA:=0
   QTD2:=0
   PARA I:=1 ATE 5 FACA
      SE PRECO_PROD[I]>100 ENTAO
         SOMA:=PRECO_PROD[I]+SOMA
         QTD2:=QTD2+1
      FIMSE
   FIMPARA
   MEDIA:=SOMA/QTD2
   ESCREVAL("A MEDIA DOS PREÇOS SUPERIORES A R$100,00 É: R$",MEDIA:4:2)

fimalgoritmo