Repostas exercício 02 - Estrutura Condicional

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