algoritmos

ALGORITMOS EM VISUALG

algoritmo "DOBRO"
// Função : EXERCÍCIO 01 - Faça um algoritmo que leia um numero digitado pelo usuário e informe se o dobro do número é maior que 40.
// Autor : LMCFVARGAS
// Data : 15/09/2014
// Seção de Declarações var numero:inteiro inicio escreva ("DIGITE UM NÚMERO:") leia(numero) Se(numero*2>40)entao escreva("O DOBRO DO NÚMERO DIGITADO É MAIOR QUE 40") senao escreva("O DOBRO DO NÚMERO DIGITADO É MENOR QUE 40") fimse fimalgoritmo ***XXX***XXX***

algoritmo "METADE"
// Função : EXERCÍCIO 02 - Faça um algoritmo que leia um numero digitado pelo usuário e informe se a metade do número é menor que 20.
// Autor : LMCFVARGAS
// Data : 15/09/2014
// Seção de Declarações var numero:inteiro inicio escreva ("DIGITE UM NÚMERO: ") leia (numero) se (numero/2n2)entao escreva ("O PRIMEIRO NÚMERO É MAIOR QUE O SEGUNDO!") senao escreva("O PRIMEIRO NÚMERO É MENOR QUE O SEGUNDO!") fimse fimalgoritmo *** XXX***XXX***

algoritmo "APROVADO OU REPROVADO"
// Função : EXERCÍCIO 08 - Faça um programa para ler o nome, as três notas e escrever se o aluno é aprovado ou reprovado, a media para aprovação é 7.0.
// Autor : LMCFVARGAS
// Data : 15/09/2014
// Seção de Declarações var nota1,nota2,nota3,media:real nome:caractere

inicio
// Seção de Comandos escreval("INFORME O NOME DO(A) ALUNO(A): ") leia(nome) escreval("DIGITE A PRIMEIRA NOTA: ") leia(nota1) escreval("DIGITE A SEGUNDA NOTA: ") leia(nota2) escreval("DIGITE A TERCEIRA NOTA: ") leia(nota3) media= 7)entao escreval ("O(A) ALUNO(A): ",nome," FOI APROVADO(A)") senao ' escreval ("O(A) ALUNO(A): ",nome," FOI REPROVADO(A)") fimse