Exercicios - Lista 02 - Decisao - Respostas

Prévia do material em texto

UNIVERSIDADE FEDERAL DE PELOTAS
CENTRO DE DESENVOLVIMENTO TECNOLÓGICO
Programação de Computadores 
Prof. André Desessards Jardim
adjardim@terra.com.br
EXERCÍCIOS - (Lista 02 – Estruturas de Decisão – Respostas)
1. Faça um algoritmo que leia um número e mostre se ele é positivo, negativo ou zero.
algoritmo questao_01;
var n: inteiro;
inicio
escrever ("Entre com o numero: ");
ler (n);
se n = 0 entao
escrever ("Eh zero")
senao
se n>0 entao
escrever ("Eh positivo")
senao
escrever ("Eh negativo");
		fimse;
	fimse;
fim.
2. Faça um algoritmo que leia dois números e mostre se são iguais. Se não forem iguais, mostre o maior.
algoritmo questao_02;
var n1,n2: inteiro;
inicio
escrever ("Entre com o primeiro numero (n1): ");
ler (n1);
escrever ("Entre com o segundo numero (n2): ");
ler (n2);
se n1=n2 entao
escrever ("São iguais");
senao
se n1>n2 entao
escrever ("Maior eh n1: ",n1);
senao
escrever ("Maior eh n2: ",n2);
		fimse;
fimse;
fim.
3. Faça um algoritmo que leia três números e mostre o maior.
algoritmo questao_03;
var n1,n2,n3: inteiro;
inicio
escrever ("Entre com o primeiro numero (n1): ");
ler (n1);
escrever ("Entre com o segundo numero (n2): ");
ler (n2);
escrever ("Entre com o terceiro numero (n3): ");
ler (n3);
se (n1>n2) E (n1>n3) então 
		escrever ("Maior eh n1: ",n1);
senao
		se (n2>n1) E (n2>n3) entao
			escrever ("Maior eh n2: ",n2);
		senao
			escrever ("Maior eh n3: ",n3);
		fimse;
fimse;
fim.
4. Leia uma nota e mostre o conceito equivalente. Suponha a seguinte tabela de conversão.
	Nota
	Conceito
	de 0.0 até 5.0
	D
	acima de 5.0 até 7.0
	C
	acima de 7.0 até 9.0
	B
	acima de 9.0 até 10.0
	A
algoritmo questao_04;
var nota: real;
inicio
escrever ("Entre com a nota: ");
ler (nota);
se (nota>=0) E (nota<=5) entao
escrever ("Conceito D");
se (nota>5) E (nota<=7) entao
escrever ("Conceito C");
se (nota>7) E (nota<=9) entao
escrever ("Conceito B");
se (nota>9) E (nota<=10) entao
escrever ("Conceito A");
fim.
5. Faça um algoritmo que leia 3 números e diga se podem ser lados de um triângulo. Observe: A, B e C são lados de um triângulo se: A < (B+C) e B < (C+A) e C < (A+B).
algoritmo questao_05;
var A,B,C: real;
inicio
escrever ("Entre com o primeiro numero: ");
ler (A);
escrever ("Entre com o segundo numero: ");
ler (B);
escrever ("Entre com o terceiro numero: ");
ler (C);
se (A<(B+C)) E (B<(C+A)) E (C<(A+B)) entao
escrever ("São lados de um triangulo");
senao
escrever ("Não são lados de um triangulo");
	fimse;
fim.
6. Faça um algoritmo que leia o valor dos lados de um triângulo e diga se é equilátero, isósceles ou escaleno.
- Equilátero se: A = B = C.
- Isósceles se: A = B ou B = C ou A = C
- Escaleno se: A ≠ B ≠ C
algoritmo questao_06;
var A,B,C: real;
Inicio
	escrever ("Entre com o primeiro numero: ");
ler (A);
escrever ("Entre com o segundo numero: ");
ler (B);
escrever ("Entre com o terceiro numero: ");
ler (C);
se (A<(B+C)) E (B<(C+A)) E (C<(A+B)) entao
se (A = B) E (B = C) entao
escrever ("Triângulo equilatero");
senao
se (A=B) OU (A=C) OU (C=B) entao
escrever ("Triângulo isoceles");
senao
escrever ("Triângulo escaleno");
			fimse;
		fimse;
	senao
escrever ("Não são lados de um triangulo");
	fimse;
fim.
7. Faça um algoritmo que leia a média e a frequência de um aluno e mostre se ele foi aprovado. Os critérios de aprovação são:
Se a média for maior ou igual a 7.0 e a frequência maior que 75 então aluno está aprovado.
Se a média for maior que 9.0 o aluno é aprovado com qualquer frequência.
Se a média for maior que 5.0 e frequência maior ou igual a 75 então o aluno fica para recuperação.
algoritmo questao_07;
var media, freq: Real;
inicio
escrever ("Entre com a Media: ");
ler (media);
escrever ("Entre com a Frequencia: ");
ler (freq);
se media>=9 entao
escrever ("Aluno aprovado");
	senao
se (media>=7) E (freq>=75) entao
escrever ("Aluno aprovado")
senao
se (media>=5) E (freq>=75) entao
escrever ("Aluno de recuperação");
senao
escrever ("Aluno reprovado");
			fimse;
		fimse;
	fimse;
fim.
8. Faça um algoritmo que leia 3 números inteiros e imprima o menor deles.
algoritmo questao_08;
var A,B,C,menor: inteiro;
inicio
escrever ("Entre com o primeiro numero (A): ");
ler (A);
escrever ("Entre com o segundo numero (B): ");
ler (B);
escrever ("Entre com o terceiro numero (A): ");
ler (C);
se (A<B) E (A<C) entao
 	escrever ("Menor eh A: ", A);
senao
 	Se (B<A) E (B<C) entao
 		escrever ("Menor eh B :",B);
senao 
escrever ("Menor eh C: ",C);
fimse;
fimse;
fim.
9. Faça um algoritmo que leia o número do mês e informe o número de dias que ele tem.
algoritmo Questao_09;
var mes: inteiro;
inicio
escrever ("Entre com o mes :");
ler (mes);
escolha mes
caso 1,3,5,7,8,10,12
escrever ("Mes com 31 dias");
caso 4,6,9,11
escrever ("Mes com 30 dias");
Caso 2
escrever ("Mes com 28 ou 29 dias");
Outro caso
escrever ("Nao eh um mes valido");
	 fimescolha;
fim.
10. Faça um programa que leia um número que represente um determinado mês do ano. Após a leitura escreva por extenso qual o mês lido. Caso o número digitado não esteja na faixa de 1 até 12 e escreva uma mensagem informando o usuário do erro da digitação. Observação: use estrutura caso.
algoritmo questao_10;
var mes: inteiro;
inicio
escrever ("Entre com o mes: ");
ler (mes);
escolher mês
caso 1
escrever ("Janeiro");
caso 2
escrever ("Fevereiro");
caso 3
escrever ("Marco");
caso 4
escrever ("Abril");
caso 5
escrever ("Maio");
caso 6
escrever ("Junho");
caso 7
escrever ("Julho");
caso 8
escrever ("Agosto");
caso 9
escrever ("Setembro");
caso 10
escrever ("Outubro");
caso 11
escrever ("Novembro");
caso 12
escrever ("Dezembro");
outro caso
escrever ("Nao eh um mes valido");
	fimescolha;
fim.
11. Faça um programa leia o nome por extenso de um mês (janeiro, fevereiro, março...) e informe o número de dias que ele tem. Observação: use estrutura caso e tipo de variável caracter.
algoritmo questao_11;
var mes: caracter;
inicio
	escrever ("Entre com o mes:");
ler (mes);
escolha mes
caso "janeiro","marco","maio","julho","agosto","outubro","dezembro"
escrever("Mes com 31 dias");
caso "abril","junho","setembro","novembro"
escrever ("Mes com 30 dias");
caso "fevereiro"
escrever (Mes com 28 ou 29 dias");
outro caso
escrever ("Nao eh um mes valido");
	fimescolha;
fim.
12. Faça um programa que leia dois números e permita ao usuário escolher entre as seguintes opções: Observação: use estrutura caso.
1 – Somar os dois números.
2 – Encontrar o módulo (subtrair o maior do menor).
3 – Elevar o primeiro número ao segundo.
4 – Calcular a média dos dois números.
algoritmo questao_12;
var n1,n2:real;
 opcao:inteiro;	
inicio
	escrever ("Digite o primeiro numero (n1): ");
ler (n1);
escrever ("Digite o segundo numero (n2): ");
ler (n2);
	escrever ("Escolha: ");
	escrever ("1 – Somar");
	escrever ("2 – Modulo");
	escrever ("3 – Potenciacao");
	escrever ("4 – Media");
	ler (opcao);
	escolha opcao
		caso 1
			escrever ("Soma = ",n1+n2);
		caso 2
			se n1>n2 entao
				escrever ("modulo = ",n1-n2);
			senao
				escrever ("modulo = ",n2-n1); 
			fimse;
		caso 3
			escrever ("Potenciacao = ",n1**n2);
		caso 4
			escrever ("Media = ",(n1+n2)/2);
		outro caso
			escreva ("Opcao invalida")
	fimescolha;
fim.
� PAGE \* MERGEFORMAT �6�