algoritmo exemplo 1

algoritmo "semnome"

var
Altura, Maior_h, menor_h, media_hf, media_h:real cont,cont_f, sexo: inteiro inicio // Seção de Comandos para cont de 1 ate 5 faca escreval("Digite o sexo: 1-Masc, 2-Fem") leia(sexo) escreval("Digite a sua altura em Metros") leia(altura) se (sexo = 2) entao cont_f <- cont_f + 1 media_hf <- media_hf + altura fimse se (altura > maior_h) entao maior_h <- altura fimse se (altura < menor_h) entao menor_h <- altura fimse media_h <- media_h + altura fimpara escreval("A maior altura da turma é: ", maior_h) escreval("A menor altura da turma é: ", menor_h) escreval("A média da altura das mulheres é: ",media_hf / cont_f) escreval("A média de altura da turma é: ", media_h / 5) fimalgoritmo algoritmo "semnome"
// Função :
// Autor :
// Data : 03/06/2015
// Seção de Declarações var num1, num2: real operador: caracter inicio enquanto (operador <> "s") faca escreval("informe o primeiro numero: ") leia(num1) escreval("qual operação deseja realizar? +,-,*,/ ou s para sair...") leia(operador) escreval("informe o segundo numero: ") leia(num2) se (operador = "+") entao escreval("o resultado é: ",num1 + num2) fimse se (operador = "-") entao escreval("o resultado é: ",num1 - num2) fimse se (operador = "*") entao escreval("o resultado é: ",num1 * num2) fimse se (operador = "/") entao escreval("o resultado é: ",num1 / num2) fimse fimenquanto fimalgoritmo

algoritmo "Potencia"
// Função :
// Autor :
// Data : 03/06/2015
// Seção de Declarações var i, base, expoente, resultado: inteiro inicio // Seção de Comandos escreval("Informe o valor da base....: ") Leia(base) escreval("Informe o valor do expoente: ") Leia(expoente) resultado <- 1 para i de 1 ate expoente