Algoritmo em Portugol

Veja também - Lista de exercícios 01 de Fábio resolvida

Logo abaixo um exemplo de algoritmo em Portugol que utiliza comandos básicos de leia, escreva, comando se-então, e atribuições matemáticas simples de acordo com a última aula de Algoritmo e Programação (21/03):

algoritmo "Média Aritmética"
// Função : Calcula a média de dois numeros
// Autor : Caio Ladislau
// Data : 21/3/2011
// Seção de Declarações
var
n1,n2: inteiro
med: real
inicio
// Seção de Comandos
escreval ("Digite as duas notas sequencialmente: ")
leia(n1,n2)
med <- (n1 + n2) / 2
escreval  // este comando cria um pulo de linha "linha em branco"
escreval ("Média aritmética:", med)
escreval
se med >= 7 entao
      escreva ("Situação: Aprovado")
      senao
      se med >= 5 entao
            escreva ("Situação: Não aprovado - Apto para Prova Final")
            senao
            se med < 5 entao
                  escreva ("Situação: Reprovado")
            fimse
      fimse
fimse
fimalgoritmo

Clique na imagem para ampliar

Se você quiser contribuir para o post deixe sugestões em comentários ou mande algoritmos em portugol para produvasf@hotmail.com os algoritmos sugeridos pelo email logo serão colocadas nesse post permanemtemente.

Posted in: Algoritmo e Programação,Linguagem (Pseudo) Portugol