Baixe o app para aproveitar ainda mais
Prévia do material em texto
Unibratec Aluno : Fabricio de Medeiros 1)Elabore um algoritmo que leia uma variável numérica e exiba a mensagem dizendo se este número é par ou impar (descarte a possibilidade da digitação do número 0). algoritmo "semnome" // Função : // Autor : // Data : 24/3/2015 // Seção de Declarações var numero : inteiro inicio escreva("escreva o numero : ") leia(numero) se numero <> 0 entao se numero % 2 = 0 entao escreva("Número par ") senao escreva("Número impar") fimse fimse // Seção de Comandos fimalgoritmo 2) Elabore um algoritmo que leia uma variável numérica e exiba a mensagem dizendo se este número é positivo ou negativo (descarte a possibilidade da digitação do número 0). algoritmo "positivo ou negativo" // Função : // Autor : // Data : 24/3/2015 // Seção de Declarações var numero : inteiro inicio // Seção de Comandos escreva("Digite um número : ") leia(numero) se numero = 0 entao escreva("Não digite zero") senao se numero < 0 entao Unibratec Aluno : Fabricio de Medeiros escreva("número negativo") senao escreva("Número é positivo") fimse fimse fimalgoritmo 3) Tendo como dados de entrada a altura e o sexo de uma pessoa, construa um algoritmo que calcule seu peso ideal, utilizando as seguintes fórmulas: Para homens: (72,7 *h) - 58 Para mulheres: (62,1*h) – 44,7 algoritmo "semnome" // Função : // Autor : // Data : 25/3/2015 // Seção de Declarações var altura : real sexo : caractere inicio // Seção de Comandos escreva("Digite seu sexo M ou F : ") leia(sexo) escreva("Digite sua altura ") leia(altura) se sexo = "M" entao escreva((72.7 * altura) - 58) senao se sexo = "F" entao escreva((62.1 * altura) - 44.7) fimse fimse fimalgoritmo Unibratec Aluno : Fabricio de Medeiros 4)Crie uma rotina que calcule a média de 3 notas, que serão recebidas via teclado, sabendo-se que a primeira nota possui peso 1 a segunda peso 4 e a terceira 5. Exiba no final do algoritmo a seguinte mensagem: Aprovado se a média for maior ou igual 6,0 Recuperação se a média entre 4,0 e 5,9 Reprovado se a média for menor que 4,0 algoritmo "semnome" // Função : // Autor : // Data : 25/3/2015 // Seção de Declarações var n1,n2,n3,media : real pesos : inteiro inicio // Seção de Comandos escreva("Digite a primeira nota : ") leia(n1) escreva("Digite a segunda nota : ") leia(n2) escreva("Digite a terceira nota : ") leia(n3) media <- ((n1 * 1) + (n2 * 4) + (n3 * 5))/10 se media >= 6 entao escreval("Aprovado! ") escreval("Sua média :",media) senao se ((media < 6) e (media >= 4)) entao escreval("Recuperação ") escreval("Sua média :",media) senao escreval("Reprovado") escreval("Sua média :",media) fimse fimse fimalgoritmo Unibratec Aluno : Fabricio de Medeiros 5)Construa um algoritmo que receba três número e exiba o maior deles. algoritmo "semnome" // Função : // Autor : // Data : 25/3/2015 // Seção de Declarações var n1,n2,n3, maior : inteiro inicio // Seção de Comandos escreva("Digite um número : ") leia(n1) escreva("Digite um número : ") leia(n2) escreva("Digite um número : ") leia(n3) se ((n1 > n2) e (n1 > n3)) entao maior <- n1; escreva("O maior número é : ",maior) senao se((n2 > n1) e (n2 > n3)) entao maior <- n2 escreva("O maior número é : ",maior) senao se ((n3 > n1) e (n3 > n2)) entao maior <- n3 escreva("O maior número é : ",maior) fimse fimse fimse fimalgoritmo Unibratec Aluno : Fabricio de Medeiros 6) Elabore um algoritmo que receba 3 números e exiba esses números ordenados crescentemente. Considere que os números lidos são distintos. algoritmo "Ordem crescente" // Função : // Autor : // Data : 25/3/2015 // Seção de Declarações var n1,n2,n3 : inteiro inicio // Seção de Comandos escreva("Digite um número : ") leia(n1) escreva("Digite um número : ") leia(n2) escreva("Digite um número : ") leia(n3) escreval("Ordem crescente") se ((n1 > n2) e (n1 > n3)) entao se(n2 > n3) entao escreval(n3,n2,n1) senao se (n3 > n2) entao escreval(n2,n3,n1) fimse fimse fimse se ((n2 > n1) e (n2 > n3)) entao se (n1 > n3) entao escreval(n3,n1,n2) senao se (n3 > n1) entao escreval(n1,n3,n2) fimse Unibratec Aluno : Fabricio de Medeiros fimse fimse se ((n3 > n1) e (n3 > n2)) entao se (n1 > n2) entao escreval(n2,n1,n3) senao se (n2 > n1) entao escreval(n1,n2,n3) fimse fimse fimse fimalgoritmo 7) Elaborar um algoritmo para processar uma venda de livros em uma livraria. Solicitar o código do tipo de livro vendido (A, B, C) e a quantidade de livros. Preços: Tipo A: R$ 10,00 Tipo B: R$ 20,00 Tipo C: R$ 30,00 Calcular e informar preço a pagar. algoritmo "Livros" // Função : // Autor : // Data : 25/3/2015 // Seção de Declarações var valorP : real quantidadeL : inteiro TipoL : caractere inicio // Seção de Comandos escreva("Digite a quantidade de livros : ") leia(quantidadeL) escreva("Digite o tipo do livro : A ou B ou C ") leia(TipoL) se TipoL = "A" entao valorP <- quantidadeL * 10 escreva("Valor a pagar : R$",valorP) senao se TipoL = "B" entao valorP <- quantidadeL * 20 escreva("Valor a pagar : R$",valorP) senao se TipoL = "C" entao valorP <- quantidadeL * 30 Unibratec Aluno : Fabricio de Medeiros escreva("Valor a pagar : R$",valorP) fimse fimse fimse fimalgoritmo 8) Elaborar um algoritmo que leia 3 valores quaisquer e verifique se forma um triângulo (para formar um triângulo a soma dos dois lados tem que ser maior que o terceiro). Caso isto aconteça, imprima uma mensagem dizendo se o triângulo é EQUILÁTERO, ISÓSCELES OU ESCALENO. Caso contrário, imprima uma mensagem dizendo: “Estes valores não formam um triângulo”. Dados: Triângulo Equilátero – Possui três lados iguais Triângulo Isósceles – Possi dois lados iguais Triângulos Esclaeno – Possui três lados diferentes algoritmo "semnome" // Função : // Autor : // Data : 25/3/2015 // Seção de Declarações var t1,t2,t3 : inteiro validade : logico inicio // Seção de Comandos escreva("Digite o primeiro lado : ") leia(t1) escreva("Digite o segundo lado : ") leia(t2) escreva("Digite o terceiro lado : ") leia(t3) //verifica se forma um triâgulo se ((t1 < (t2 + t3)) e (t2 < (t1 + t3)) e (t3 < (t1 + t2))) entao validade <- verdadeiro Unibratec Aluno : Fabricio de Medeiros senao validade <- falso fimse se validade = verdadeiro entao se ((t1 = t2) e (t1 = t3) e (t2 = t3)) entao escreva("Triângulo Equilátero") senao se ((t1 = t2) ou (t1 = t3) ou (t2 = t3)) entao escreva("Triângulo Isósceles") senao se ((t1 <> t2) e (t1 <> t3) e (t2 <> t3)) entao escreva("Triângulos Esclaeno") fimse fimse fimse senao escreva("Não é um triângulo ") fimse fimalgoritmo 9) Elabore um algoritmo que, dada a idade de um nadados, classifique-o em uma das seguintes categorias. INFANTIL A = 5 – 7 anos inclusive INFANTIL B = 8 – 10 anos inclusive JUVENIL A = 11 – 13 anos inclusive JUVENIL B = 14- 17 anos inclusive SÊNIO = maiores de 18 anos algoritmo "semnome" // Função : // Autor : // Data : 26/3/2015 // Seção de Declarações Unibratec Aluno : Fabricio de Medeiros var idade : inteiro inicio // Seção de Comandos escreva("Sua idade é ? ") leia(idade) se ((idade >= 5) e (idade <= 7)) entao escreva("INFANTIL A") senao se ((idade <= 10)e(idade >= 8)) entao escreva("INFANTIL B") senao se ((idade <= 13) e (idade >= 11)) entao escreva("JUVENIL A") senao se ((idade <= 17) e (idade >= 14)) entao escreva("JUVENIL B") senao se (idade >= 18) entao escreva("SÊNIO") fimse fimse fimse fimse fimse fimalgoritmo
Compartilhar