Logica de Programação_Resolução dos exercícios_M2

Prévia do material em texto

DISCIPLINA DE LÓGICA DE PROGRAMAÇÃO 
PROFA VERLANI TIMM HINZ 
 
RESOLUÇÃO SUGESTÃO LISTA DE EXERCÍCIOS 
 
MÓDULO 2 
UNIDADE 1 – Seleção simples 
1. Elabore um algoritmo que leia um número, apresente a raiz quadrada e o 
valor deste número elevado ao quadrado. 
 
Algoritmo “Exe01” 
Var 
 n: inteiro 
 r, q:real 
Inicio 
 escreva("Digite um numero:") 
 leia (n) 
 r:=raizq(n) 
 escreval("A raiz quadrade de",n,"é:",r) 
 q:=n^2 
 escreval("O quadrado de",n,"é:",q) 
Fimalgoritmo 
 
2. Escreva um algoritmo em para ler uma temperatura em graus Fahrenheit, 
calcule e escreva o valor correspondente em graus Celsius (baseado na 
fórmula abaixo): 
 C:=((F-32)*5)/9 
Algoritmo “Exe02” 
Var 
 C, F: real 
Inicio 
 escreva("Digite a temperatura em Fahrenheit:") 
 leia (F) 
 C:=((F-32)*5)/9 
 escreval("A temperatura em Celsius é:”, C) 
Fimalgoritmo 
 
3. Uma loja de roupas em geral está vendendo seus produtos em 5 (cinco) 
prestações sem juros ou oferece um desconto de 20% sobre as compras à 
vista. Faça um algoritmo que receba o valor da compra, mostre o valor das 
prestações e o valor à vista. 
 Algoritmo “Exe03” 
Var 
 vc, vp, vv:real 
Inicio 
 escreva ("digite o valor da compra: ") 
 leia (vc) 
 vp:=vc/5 
 vv:=vc-(vc*0.20) 
 escreval("O valor de cada prestação é:",vp) 
 escreval("O valor a vista é:",vv) 
Fimalgoritmo 
 
UNIDADE 2 – Seleção composta ou dupla 
1. Escreva um algoritmo que leia um número e imprima-o, caso ele seja maior 
que 20. 
Algoritmo "Exe_unid2_01" 
Var 
 n:inteiro 
Inicio 
 escreva ("digite um número: ") 
 leia (n) 
 se (n> 20) entao 
 escreva("O número é:",n) 
 fimse 
Fimalgoritmo 
 
 
 
2. Escreva um algoritmo que leia dois valores numéricos inteiros e efetue a 
adição; caso o resultado seja maior que 10, apresentá-lo. 
Algoritmo "Exe_unid2_02" 
Var n1, n2, r: inteiro 
Inicio 
 escreva ("digite um número: ") 
 leia (n1) 
 escreva ("digite outro número: ") 
 leia (n2) 
 r:=n1+n2 
 se (r> 10) entao 
 escreva("O número é:",r) 
 fimse 
Fimalgoritmo 
 
 
3. Escreva um algoritmo que determine (imprima) se um dado número N 
inteiro é PAR ou ÍMPAR. 
Algoritmo "Exe_unid2_03" 
Var 
 n:inteiro 
Inicio 
 escreva ("digite um número: ") 
 leia (n) 
 se (n mod 2 =0) entao 
 escreva("O número é par") 
 senao 
 escreva("O número é ímpar") 
 fimse 
Fimalgoritmo 
 
4. Escreva um algoritmo que leia um número e imprima a raiz quadrada do 
número caso ele seja positivo ou igual a zero; e o quadrado do número caso 
ele seja negativo. 
Algoritmo "Exe_unid2_04" 
Var 
 n, r:real 
Inicio 
 escreva ("digite um número: ") 
 leia (n) 
 se (n>=0) entao 
 r:=raizq(n) 
 senao 
 r:=n^2 
 fimse 
 escreva("O número é:", r) 
Fimalgoritmo 
 
Observações: 
A expressão raizq é a expressão usada para calcular a raiz quadrada. 
A expressão C ^2, significa C expoente 2 e poderia ser feito, também, como C*C. 
 
Unidade 3 – Seleção aninhada ou encadeada 
1. Escreva um algoritmo para determinar se um dado número N (recebido 
através do teclado) é POSITIVO, NEGATIVO ou NULO. 
Algoritmo "Exe_unid3_01" 
Var 
 n:inteiro 
Inicio 
 escreva ("digite um número: ") 
 leia (n) 
 se (n>0) entao 
 escreva("O número é positivo") 
 senao 
 se (n<0) entao 
 escreva("O número é negativo") 
 senao 
 escreva("O número é zero") 
 fimse 
 fimse 
Fimalgoritmo 
 
Observação: 
A ordem dos testes poderia ser alterada para gerar o mesmo resultado. 
 
2. Faça um algoritmo que leia 3 números inteiros distintos e escreva o menor 
deles. 
Algoritmo "Exe_unid3_02" 
Var 
n1, n2, n3: inteiro 
Inicio 
escreva ("Digite o primeiro número:") 
leia(n1) 
escreva ("Digite o segundo número:") 
leia(n2) 
escreva ("Digite o terceiro número:") 
leia(n3) 
se (n1<>n2) e (n1<>n3) e (n2<>n3) entao //testa se os números 
são distintos 
 se (n1<n2) e (n1<n3) entao 
 escreva (n1, "é o menor") 
 senao 
 se (n2<n1) e (n2<n3) entao 
 escreva (n2, "é o menor") 
 senao 
 se (n3<n1) e (n3<n1) entao 
 escreva (n3, "é o menor") 
 fimse 
 fimse 
 fimse 
senao 
 escreva ("Os números não são distintos") 
 fimse 
Fimalgoritmo 
 
3. Faça um algoritmo que leia os valores A, B e C. Mostre uma mensagem que 
informe se a soma de A com B é menor, maior ou igual a C. 
Algoritmo "Exe_unid3_03" 
Var A, B,C: inteiro 
Inicio 
escreva ("Digite o valor de A:") 
leia(A) 
escreva ("Digite o valor B:") 
leia(B) 
escreva ("Digite o valor de C:") 
leia(C) 
se (A+B > C) entao 
 escreva ("O valor de C é menor que a soma de A e B") 
 senao 
 se (A+B < C) entao 
 escreva ("O valor de C é maior que a soma de A e B") 
 senao 
 se (A+B = C) entao 
 escreva ("O valor de C é igual a soma de A e B") 
 fimse 
 fimse 
 fimse 
Fimalgoritmo 
 
4. Uma confeitaria vende três tipos de doces. Sabendo-se que o doce do tipo 1 
é vendido por R$ 2,00, o do tipo 2 por R$ 2,50 e o do tipo 3 por R$ 3,00. 
Faça um algoritmo que, para cada tipo de doce, mostre a quantidade 
vendida e o total arrecadado. 
Algoritmo "Exe_unid3_04" 
Var tipodoce, quant: inteiro 
 valortotal:real 
Inicio 
 escreva ("Escolha o tipo de doce: 1- Tipo1, 2- Tipo2, 3- 
Tipo3: ") 
 leia(tipodoce) 
 
 se (tipodoce<>1) e (tipodoce<>2) e (tipodoce<>3) entao 
 escreva("Opção inválida!") 
 senao 
 escreval ("Digite a quantidade:") 
 leia(quant) 
 se (tipodoce=1) entao 
 valortotal:=quant * 2 
 escreva("O valor total do doce ", tipodoce, " é:", 
valortotal) 
 senao 
 se (tipodoce=2) entao 
 valortotal:=quant * 2.5 
 escreva("O valor total do doce ", tipodoce, " 
é:", valortotal) 
 senao 
 se (tipodoce=3) entao 
 valortotal:=quant * 3 
 escreva("O valor total do doce ", tipodoce, " 
é:", valortotal) 
 fimse 
 fimse 
 fimse 
 fimse 
Fimalgoritmo 
 
Unidade 4 – Seleção Múltipla 
 
1. Construa um algoritmo que leia um número inteiro de 1 a 7 e informe o dia 
da semana correspondente, sendo domingo o dia de número 1. Se o número 
não corresponder a um dia da semana, mostre uma mensagem de erro. 
 
Algoritmo "Exe_unid3_01" 
var dia: INTEIRO 
inicio 
 escreva ("Informe o dia da semana: ") 
 leia (dia) 
 Escolha dia 
 caso 1 
 escreva ("Domingo") 
 caso 2 
 escreva ("Segunda") 
 caso 3 
 escreva ("Terça") 
 caso 4 
 escreva ("Quarta") 
 caso 5 
 escreva ("Quinta") 
 caso 6 
 escreva ("Sexta") 
 caso 7 
 escreva ("Sábado") 
 outrocaso 
 escreva ("Dia inválido!") 
 fimescolha 
Fimalgoritmo 
 
2. Construa um algoritmo que solicite ao usuário para digitar um número 
e mostre-o por extenso. Este número deve variar entre 1 e 10. Se o 
usuário introduzir um número que não está neste intervalo, mostre: 
"Número inválido". 
 
Algoritmo "Exe_unid3_01" 
var n: INTEIRO 
inicio 
 escreva ("Informe o número: ") 
 leia (n) 
 Escolha n 
 caso 1 
 escreva ("Um") 
 caso 2 
 escreva ("Dois") 
 caso 3 
 escreva ("Três") 
 caso 4 
 escreva ("Quatro") 
 caso 5 
 escreva ("Cinco") 
 caso 6 
 escreva ("Seis") 
 caso 7 
 escreva ("Sete") 
 caso 8 
 escreva ("Oito") 
 caso 9 
 escreva ("Nove") 
 caso 10 
 escreva ("Dez") 
 outrocaso 
 escreva ("Número inválido!") 
 fimescolha 
Fimalgoritmo 
 
3. Construa um algoritmo que solicite um mês do ano (01 a 12) e, de acordo 
com as condições abaixo, dizer: 01 (Férias), 02 a 06 (1º semestre letivo), 
07(Recesso), 08 a 11 (2º semestre letivo), 12 (Férias). 
 
Algoritmo "Exe_unid4_02" 
var m: INTEIRO 
inicio 
 escreva ("Informe o mês: ") 
 leia (m) 
 Escolha m 
 caso 1,12 
 escreva ("Férias") 
 caso 2 ate 6 
 escreva ("1º semestre letivo") 
 caso 7 
 escreva ("Recesso") 
 caso 8 ate 11 
 escreva ("2º semestre letivo") 
 outrocaso 
 escreva ("Mês inválido!") 
 fimescolha 
Fimalgoritmo