Introdução à Programação

Prévia do material em texto

1
Algoritmos e lógica de programação
Prof. Doutorando Leandro Kravczuk
2
Exercícios
1) Mostrar o resultado da divisão de dois 
números 
2) Mostrar a média entre três números 
3
Respostas Exercícios 
1)
algoritmo "multiplicacaoDoisNumeros" 
var 
resultado, n1, n2: real 
inicio 
Escreva("Digite o primeiro valor: ") 
Leia(n1) 
Escreva("Digite o segundo valor: ") 
Leia(n2) 
resultado <- n1 / n2 
Escreva("A divisão entre", n1, " e", n2, " é", resultado) 
fimalgoritmo 
4
Resposta Exercícios
2)
algoritmo "mediaTresNumeros" 
var 
resultado, n1, n2, n3: real 
inicio 
Escreva("Digite o primeiro valor: ") 
Leia(n1) 
Escreva("Digite o segundo valor: ") 
Leia(n2) 
Escreva("Digite o terceiro valor: ") 
Leia(n3) 
resultado <- (n1 + n2 + n3) / 3 
Escreva ("A media entre ", n1, ",", n2, " e", n3, " é", resultado) 
fimalgoritmo 
5
Operadores Relacionais
Operadores relacionais são utilizados para comparar valores, o 
resultado de uma expressão relacional é um valor booleano 
(VERDADEIRO ou FALSO). 
Os operadores relacionais são: igual, diferente, maior, menor, maior 
ou igual, menor ou igual.
Não é necessário explicar cada um, pois eles são auto-explicativos.
6
7
8
9
Algoritmo "semnome"
Var
n1, n2:inteiro
resul:logico
Inicio
escreval ("digite um numero")
leia (n1)
escreval ("digite outro numero")
leia (n2)
resul<- (n1>n2)
escreval (n1," > ", n2, " ? ", resul)
fimalgoritmo
10
Algoritmo "semnome"
Var
n1, n2:inteiro
Inicio
escreval ("digite um numero")
leia (n1)
escreval ("digite outro numero")
leia (n2)
escreval (n1," > ", n2, " ? ", (n1>n2))
escreval (n1," < ", n2, " ? ", (n1<n2))
escreval (n1," >= ", n2, " ? ", (n1>=n2))
escreval (n1," <= ", n2, " ? ", (n1<=n2))
escreval (n1," = ", n2, " ? ", (n1=n2))
escreval (n1," <> ", n2, " ? ", (n1<>n2))
fimalgoritmo
11
Pratiquem ex: a=b
12
Pratiquem
Ex:a<>b
13
Pratiquem
Ex: A>2
14
Pratiquem
A>=2
15
Pratiquem
Ex: C=A+B
16
Pratiquem
Ex: (C>=B^A)
17
Pratiquem
(C<=B^A)
18
Pratiquem
B<=C%2
19
Pratiquem
1=C%2
20
Exemplo:
Mostrar o funcionamento dos operadores 
relacionais com 3 possibilidades de valores: 
um número menor que o outro, dois 
números iguais e um número maior que 
outro. 
21
algoritmo "TesteOperadoresRelacionais"
var
numero1, numero2: INTEIRO
resultado : LOGICO
inicio
numero1 <- 5
numero2 <- 3
resultado <- numero1 = numero2
ESCREVAL (numero1, " = ", numero2, "? ", resultado)
resultado <- numero1 <> numero2
ESCREVAL (numero1, " <> ", numero2, "? ", resultado)
resultado <- numero1 > numero2
ESCREVAL (numero1, " > ", numero2, "? ", resultado)
resultado <- numero1 < numero2
ESCREVAL (numero1, " < ", numero2, "? ", resultado)
resultado <- numero1 >= numero2
ESCREVAL (numero1, " >= ", numero2, "? ", resultado)
resultado <- numero1 <= numero2
ESCREVAL (numero1, " <= ", numero2, "? ", resultado)
numero1 <- 5
numero2 <- 5
resultado <- numero1 = numero2
ESCREVAL (numero1, " = ", numero2, "? ", resultado)
resultado <- numero1 <> numero2
ESCREVAL (numero1, " <> ", numero2, "? ", resultado)
resultado <- numero1 > numero2
ESCREVAL (numero1, " > ", numero2, "? ", resultado)
resultado <- numero1 < numero2
ESCREVAL (numero1, " < ", numero2, "? ", resultado)
resultado <- numero1 >= numero2
ESCREVAL (numero1, " >= ", numero2, "? ", resultado)
resultado <- numero1 <= numero2
ESCREVAL (numero1, " <= ", numero2, "? ", resultado)
numero1 <- 5
numero2 <- 8
resultado <- numero1 = numero2
ESCREVAL (numero1, " = ", numero2, "? ", resultado)
resultado <- numero1 <> numero2
ESCREVAL (numero1, " <> ", numero2, "? ", resultado)
resultado <- numero1 > numero2
ESCREVAL (numero1, " > ", numero2, "? ", resultado)
resultado <- numero1 < numero2
ESCREVAL (numero1, " < ", numero2, "? ", resultado)
resultado <- numero1 >= numero2
ESCREVAL (numero1, " >= ", numero2, "? ", resultado)
resultado <- numero1 <= numero2
ESCREVAL (numero1, " <= ", numero2, "? ", resultado)
fimalgoritmo
22
Resultado
23
Faça a comparação de dois números utilizando todos 
operadores relacionais
Algoritmo "semnome"
Var
c, d: inteiro
Inicio
Escreva("Digite um número:")
Leia(C)
Escreva("Digite outro número:")
Leia(D)
Escreval(C," >",D,":",(C>D))
Escreval(C," <",D,":",(C<D))
Escreval(C," <>",D,":",(C<>D))
Escreval(C," >=",D,":",(C>=D))
Escreval(C," <=",D,":",(C<=D))
Escreval(C," =",D,":",(C=D))
Fimalgoritmo
24
25
26
Operadores Lógicos
Ex: Eu quero que Paula E Quezia Sejam Felizes
27
Operadores Lógicos
Ex: Eu quero que Paula ou Quezia sejam Felizes
28
Tabela Verdade
E OU
29
Pratiquem
Verdadeiro e falso
30
Pratiquem
((A=B) ou (C>A))
31
algoritmo "semnome"
var
a, b, c: inteiro
inicio
escreval ("digite 3 numeros")
leia (a)
leia (b)
leia (c)
escreval (("a=b?"), (a=b))
escreval (("c>a?"), (c>a))
escreval (("(a=b?) ou (c>a?)"), ((a=b) ou (c>a)))
escreval (("(a=b?) e (c>a?)"), ((a=b) e (c>a)))
fimalgoritmo
32
algoritmo "semnome"
var
a, b, c: inteiro
inicio
escreval ("digite 3 numeros")
leia (a)
leia (b)
leia (c)
escreval (("a=b?"), (a=b))
escreval (("c>a?"), (c>a))
escreval ("(",a,"=",b,") ou (",c,">",a,")?? ", ((a=b) ou (c>a)))
fimalgoritmo
33
Pratiquem
(não((A=B) ou (C>A)))
34
Ordem de Execução de todos Operadores que 
podem ser utilizados dentro de um algoritmo
35
Escreva um algoritmo que leia as medidas dos lados de 
um triângulo e escreva se ele é EQUILÁTERO ou 
ESCALENO.
Obs: Faça um teste lógico para saber se o triangulo é 
equilátero ou Escaleno 
Observação:
• Triângulo Equilátero: Possui 3 lados iguais.
• Triângulo Escaleno: Possui 3 lados diferentes.
36
Lembre-se
Triângulo Equilátero: é todo triângulo que apresenta os três lados com a 
mesma medida. Nesse caso dizemos que os três lados são congruentes.
Triângulo Escaleno: é todo triângulo que apresenta os três lados com medidas 
diferentes, ou seja, três lados de tamanhos diferentes.
37
algoritmo “triângulos”
var
L1, L2, L3: Real
38
Um detalhe que foi negligenciado no algoritmo anterior é se 
os valores digitados podem ou não ser um triangulo. 
Qual a regra???
Só irá existir um triângulo se, somente se, os seus lados obedeceram à seguinte regra: um de 
seus lados deve ser maior que o valor absoluto (módulo) da diferença dos outros dois lados e 
menor que a soma dos outros dois lados. Veja o resumo da regra abaixo: 
| b - c | < a < b + c 
| a - c | < b < a + c 
| a - b | < c < a + b
Exemplo: 
Com os três segmentos de reta medindo 5cm, 10cm e 9cm, podemos formar um triângulo? 
Vamos aplicar a regra da condição de existência de um triângulo para todos os lados. 
|10 – 9| < 5 < 10 + 9 
1 < 5 <19 (VERDADEIRO) 
|9 – 5| < 10 < 9 + 5 
4 < 10 < 14 (VERDADEIRO)
|5 – 10| < 9 < 10 + 5 
5 < 9 < 15 (VERDADEIRO) 
Quando um lado não obedece à regra não é possível existir um triângulo. 
39
Escreva um algoritmo que leia as medidas dos lados de 
um triângulo e escreva se ele é EQUILÁTERO ou 
ESCALENO.
Obs: Faça um teste lógico para saber se os valores 
digitados podem formar um triangulo e se o triangulo é 
equilátero ou Escaleno 
40
algoritmo “triangulos”
var
L1, L2, L3: Real
+ L2)
fimalgoritmo
41
Exemplos do algoritmo anterior
42
Escreva um algoritmo que calcule a idade 
de determinada pessoa
43
44
Escreva um algoritmo que converta 
determinada quantidade de Reais em 
Doláres
45
algoritmo "Conversor de Dolar"
var
brl, usd, cotusd : real
inicio
escreval("--------Conversor de Dolar--------")
escreva("Quantos reais voce quer converter? ")
leia(brl)
escreva("Qual a cotacao do dolar hoje? ")
leia(cotusd)
usd <- (brl/cotusd)
escreval("Voce tera", usd, " dolares")
escreva("-----------------------------------")
fimalgoritmo
46
47
Você viajou para os EUA e comprou 
diversos produtos. Ao retornar para o Brasil 
a Receita Federal cobrou imposto de 60% 
sobre tudo que você gastou nessesprodutos. Escreva um algoritmo que informe 
quanto você vai pagar de imposto. 
48
49
Exercício para Casa
Escreva um algoritmo onde você informa o valor que será 
obtido de empréstimo e em quantas parcelas quer pagar. No final, 
retorne o valor de cada parcela (inclindo o valor dos juros do 
banco)
50
algoritmo “emp"
var
empre, total, parce, total2, total3:real
inicio
escreval ("Bom Dia dona Creuza, quanto a senhora 
gostaria de receber de emprestimo?")
leia (empre)
total <- (empre*20)/100
total2 <- total+empre
escreval ("O valor com o juros do banco ficou ", total2, " 
. Em quantas vezes deseja parcelar?")
leia (parce)
total3 <- total2/parce
escreval ("As ", parce, " parcelas ficaram no valor de ", 
total3, " cada uma." )