Faça um algoritmo que receba n números e mostre positivo negativo ou zero para cada número

UNIVERSIDADE FEDERAL DE PELOTAS CENTRO DE DESENVOLVIMENTO TECNOLÓGICO Programação de Computadores Prof. André Desessards Jardim 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�