terça-feira, 4 de novembro de 2014

Resolução Exercício Módulo 2 - Instruções Cíclicas (3)



programa numeros
      declaracoes
      inteiro numero, soma, maior, menor, contador
      real media

inicio
      // inicializacao de variáveis
      contador <- 0
      soma <- 0
      // leitura do primeiro número
      escreva( "Insira um número inteiro: " )
      leia( numero )

      // inicializa o contador em 1
      contador <- 1

      // inicializa as variáveis maior e menor
      // como sendo iguais ao primeiro número lido
      soma  <- numero
      maior <- numero
      menor <- numero

      // inicia a leitura dos restantes números
      // (segundo número até ao vigésimo número)
      enquanto ( contador < 20 ) faca
         
           // pede para inserir um novo número
           escreva( "\nInsira um número inteiro: " )
           leia( numero )

           // aumenta o contador por cada numero lido
           contador <- contador + 1

         // acrescenta à soma o numero lido
           soma <- soma + numero

       // verifica se o numero lido é o maior
           se ( numero > maior ) entao
                maior <- numero
           senao
                // senao, verifica se é o menor
                se ( numero < menor ) entao
                       menor <- numero
                fimse
           fimse
      fimenquanto

      // calcula a média dos 20 números
      media <- soma / 20

      // escreve os resultados pretendidos
      escreva( "\nMaior numero lido: ", maior )
      escreva( "\nMenor numero lido: ", menor )
      escreva( "\nSoma dos números lidos : ", soma )
      escreva( "\nMédia dos números lidos: ", media )
fim

Sem comentários: