Lista de Exercícios Resolvidos - Algoritmos I - Lógica de Programação

Curso 638 SISTEMA DE INFORMAÇÃO BACHARELADO NOT Campus Sede Disciplina ALGORITMOS I Graduação AnoPeríodo Letivo 20231 Docente Lauro Ricardo M Silva Discentes Data 14082023 NÍVEL DE CONHECIMENTO 1 Faça um programa que leia um horário no sistema de 24 horas e imprima este horário no sistema de 12 horas Exemplo 2232 1032 pm Obs 000 1200 am 600 600 am 1200 1200 pm 2 Faça um programa que leia três notas de um aluno calcule sua média aritmética e imprima uma mensagem dizendo se o aluno foi aprovado reprovado ou deverá fazer prova final O critério de aprovação é o seguinte aprovado média 7 reprovado média 3 e prova final 3 média 7 3 Faça um programa que leia a idade de uma pessoa e informe sua classe eleitoral não eleitor abaixo de 16 anos eleitor obrigatório entre 18 e 65 anos e eleitor facultativo entre 16 e 18 anos e acima dos 65 anos 4 Faça um programa que leia um número da entrada calcule e imprima o seu fatorial Lembrese que n n x n 1 x n 2 x x 1 0 1 e 1 1 5 Faça um programa que leia um valor inicial e um valor final Depois o programa irá imprimir somente os números terminado por 0 O número 0 zero não faz parte da seqüência Exemplo valores lidos 11 e 23 impressão 10 10 20 ALGORITMOS I 1 ALGORITMOS I 1 program ConversorHorario var hora minuto integer begin writelnDigite o horário no formato de 24 horas hhmm readlnhora minuto if hora 0 and hora 23 and minuto 0 and minuto 59 then begin writelnHorário no formato de 12 horas if hora 0 then writeln12 minuto2 am else if hora 12 then writelnhora2 minuto2 am else if hora 12 then writeln12 minuto2 pm else writelnhora 122 minuto2 pm end else writelnHorário inválido end 2 program VerificarAprovacao var nota1 nota2 nota3 real media real begin writelnDigite as três notas do aluno readlnnota1 nota2 nota3 media nota1 nota2 nota3 3 writelnMédia do aluno media22 ALGORITMOS I 2 if media 7 then writelnAluno aprovado else if media 3 then writelnAluno reprovado else writelnAluno deverá fazer prova final end 3 program ClassificarEleitor var idade integer begin writelnDigite a idade da pessoa readlnidade if idade 16 then writelnClasse eleitoral Não eleitor else if idade 18 and idade 65 then writelnClasse eleitoral Eleitor obrigatório else writelnClasse eleitoral Eleitor facultativo end 4 program CalculaFatorial var numero fatorial integer begin writelnDigite um número para calcular o fatorial readlnnumero if numero 0 or numero 1 then fatorial 1 else begin fatorial 1 ALGORITMOS I 3 for var i numero downto 2 do fatorial fatorial i end writelnO fatorial de numero é fatorial end 5 program NumerosTerminadosPorZero var valorInicial valorFinal numero integer begin writelnDigite o valor inicial readlnvalorInicial writelnDigite o valor final readlnvalorFinal writelnNúmeros terminados por 0 entre valorInicial e valorFinal if valorInicial valorFinal then begin for numero valorInicial 1 to valorFinal 1 do begin if numero mod 10 0 then writelnnumero end end else begin for numero valorInicial 1 downto valorFinal 1 do begin if numero mod 10 0 then writelnnumero end end end