Algoritimo
// Função : Faça um programa que receba 4 notas de aluno, calcule e mostre a média aritmética das notas e a mensagens de aprovado ou reprovado, considerando para aprovação média 7.
// Data : 25/09/2012 var nome: caractere n1, n2, n3,n4, media: real inicio // Seção de Comandos escreval("Sistema de médias") escreva("Digite a primeira nota: ") leia(n1) escreva("Digite a segunda nota: ") leia(n2) escreva("Digite a terceria nota: ") leia(n3) escreva("Digite a quarta nota: ") leia(n4) media <- (n1 + n2 + n3 + n4) / 4 se media >= 7 entao escreval("Aluno aprovado!") senao escreval("Aluno reprovado!") fimse fimalgoritmo
02
algoritmo "Ex:02-pg 88"
// Função : Faça um programa que receba 2 notas, calcule e mostre a média aritmética e a mensagem que se encontra na tabela : Média aritmética | Mensagem | 0,0 | 4,0 | Reprovado | 4,0 | 7,0 | Exame | 7,0 | 100 | Aprovado |
// Data : 25/09/2012 var nome: caractere n1, n2, media: real inicio // Seção de Comandos escreval("Sistema de médias") escreva("Digite a primeira nota: ") leia(n1) escreva("Digite a segunda nota: ") leia(n2) media <- (n1 + n2) / 2 se media >= 7 entao escreval("Aluno aprovado!") senao se media <= 4 entao escreval("Aluno reprovado!") senao escreval("Aluno em exame...") fimse fimse fimalgoritmo
03
algoritmo "Ex:03-pg 88"
// Função : Faça um programa que receba dois números e mostre o menor.
// Autor :
// Data : 25/09/2012
// Seção de Declarações var nome: caractere num1, num2: real
inicio
// Seção de Comandos escreval("Digite o primeiro número: ") leia(num1) escreval("Digite o segundo número: ") leia(num2) se num1 < num2 entao escreva("O primeiro número ",num1," é menor que o segundo",num2) senao escreva("O segundo número",num2," é menor que o primeiro",num1) fimse fimalgoritmo
04
algoritmo "Ex:04-pg 88"
// Função : Faça um programa que