Um algoritmo que lê duas notas, calcula a média aritmética e exibe uma mensagem de reprovado, exame ou aprovado - Desafio de Programação Resolvido em Portugol

Informe a primeira nota: 8
Informe a segunda nota: 7.4
A média obtida foi: 7.7
Aprovado

// Como calcular a média de um aluno em Portugol

programa {
  funcao inicio() {
    // variáveis usadas na resolução do problema
    real n1, n2, media

    // vamos solicitar as duas notas do aluno
    escreva("Informe a primeira nota: ")
    leia(n1)
    escreva("Informe a segunda nota: ")
    leia(n2)

    // vamos calcular a média aritmética
    media = (n1 + n2) / 2
    escreva("A média obtida foi: ", media)

    // vamos verificar se o aluno foi reprovado, está
    // de exame ou aprovado
    se (media < 4.0) { // reprovado
      escreva("\nReprovado")
    }
    senao{ 
      se ((media >= 4.0) e (media < 7.0)) { // exame
        escreva("\nExame")
      }
      senao {
        escreva("\nAprovado")
      }
    }      
  }
}