Processamento das notas de uma turma

 programa {

  funcao inicio() {

    // total de notas para calcular

    inteiro totalNotas, i = 1, somaNotas = 0

    inteiro notaMaisBaixa = 20, notaMaisAlta = 0

    inteiro totalAprovados = 0, totalReprovados = 0

    real mediaNotas = 0, nota

    escreva("Quantas notas queres processar: ")

    leia(totalNotas)

    escreva("Vou processar ", totalNotas, " notas.")

    enquanto (i <= totalNotas) {

      escreva("\nDigita o valor da ", i ,"ª nota: ")

      leia(nota)

      somaNotas=somaNotas + nota

      se (nota < notaMaisBaixa) {

        notaMaisBaixa = nota

      }

      se (nota > notaMaisAlta) {

        notaMaisAlta = nota

      }

      se (nota > 9.5) {

        totalAprovados = totalAprovados + 1

      } senao {

        totalReprovados = totalReprovados + 1

      }      

      i = i + 1

  }

  mediaNotas = somaNotas / totalNotas

  escreva("\nA média das notas é = ", mediaNotas)

  escreva("\nA nota mais baixa é de ", notaMaisBaixa)

  escreva("\nA nota mais alta é de ", notaMaisAlta)

  escreva("\nReprovaram ", totalReprovados, " alunos.")   

  escreva("\nAprovaram ", totalAprovados, " alunos.")

  escreva("\nForam contabilizados ", totalNotas, " notas.")   

  }

}