Leonardo Miguel Machado Algoritmo Licenciatura em Computação

Prévia do material em texto

Curso: Licenciatura em Computação 
Disciplina: ALGORITMOS 
Professor: Leandro dos Santos Gonzalez Semestre: 2 º 
Aluno (a) Leonardo Miguel Machado, 
Sheila Sena Santos 
Data: 20/ 06 
 
 
LISTA DE EXERCÍCIOS – ENTRADA E SAÍDA 
 
1. Crie um algoritmo que leia o lado de um quadrado e exibe a sua área. A área 
do quadrado = Lado * Lado 
algoritmo "Area do Quadrado" 
var 
lado: inteiro 
a: inteiro 
 
inicio 
Escreva ("Escreva o valor do lado: ") 
 leia (lado) 
a <- (lado * lado) 
Escreva ("Àrea do quadrado = ", a) 
 
fimalgoritmo 
 
2. Crie um algoritmo que leia a altura e a base de um triângulo e exibe a sua área. 
A área do triângulo = Base * Altura / 2. 
 
algoritmo "Àrea do Triangulo" 
 
var 
Altura, Base, Area: Real 
inicio 
 
 Escreva ("Digite aqui a Altura do Triagulo: ") 
 Leia (Altura) 
 
 Escreva ("Digite aqui a Base do Triangulo: ") 
 Leia (Base) 
 
 Area <- Altura * Base / 2 
 Escreva ("A Área do Seu Triangulo é: ", Area) 
fimalgoritmo 
 
3. Crie um algoritmo que leia dois valores e efetua a troca do conteúdo das 
variáveis de entrada, exibindo o resultado final. 
algoritmo "Troca de Valores" 
 
var 
a, b, troca: Inteiro 
 
inicio 
 
 
escreva ("Valor de A: ") 
leia (a) 
escreva ("Valor de B: ") 
leia (b) 
troca <- a 
a <- b 
b <- troca 
escreval ("O Novo Valor de A é: ", a) 
escreval ("O Novo Valor de B é: ", b) 
fimalgoritmo 
 
4. Crie um algoritmo que leia três valores e escreva o valor da média aritmética. 
algoritmo "Media Aritmética" 
 
var 
V1, V2, V3: Inteiro 
Media: Real 
inicio 
 
Escreva ("Digite aqui o Primeiro Valor: ") 
 leia (V1) 
Escreva ("Digite aqui o Segundo Valor: ") 
 leia (V2) 
Escreva ("Digite aqui o Terceiro Valor: ") 
 leia (V3) 
Media <- (V1 + V2 + V3) / 3 
Escreval ("A Média Aritimética deste Valores é: ", Media) 
Fimalgoritmo 
 
5. Crie um algoritmo que leia um valor inteiro e exibe seu sucessor e antecessor. 
algoritmo "Antecessor e Sucessor" 
 
var 
A, S, N: Inteiro 
 
inicio 
 
escreva ("Digite um Numero: ") 
leia (N) 
A <- (N - 1) 
S <- (N + 1) 
escreval("O Antecessor de ", N, " é: ", A) 
escreval("O Sucessor de ", N, " é: ", S) 
fimalgoritmo 
 
6. Crie um algoritmo que leia dois números inteiros e exibe o resto e quociente, 
ambos os resultados inteiros. 
algoritmo "Resto e Quociente" 
 
var 
R, Q: inteiro 
A, B: Inteiro 
 
 
inicio 
 
escreva ("Digite o Valor do Dividendo: ") 
 leia(A) 
escreva ("Digite o Valor do Divisor: ") 
 Leia (B) 
Q <- Int(A/B) 
Escreval ("O Quociente é = ", Q) 
R <- (A%B) 
Escreval ("O Resto é = ", R) 
fimalgoritmo 
 
7. Crie um algoritmo que receba o saldo de uma aplicação e exibe o novo saldo, 
considerando o reajuste 1% a mais. 
algoritmo "Saldo" 
 
var 
Dinheiro: Real 
Saldo: Real 
Reajuste: Real 
inicio 
 , 
Escreva ("Digite seu Valor em Reias R$: ") 
Leia (Dinheiro) 
 Reajuste <- Dinheiro * 0.01 
Escreval ("Acrescimo de R$: ", Reajuste) 
Saldo <- (Dinheiro + Reajuste) 
Escreval ("O Seu Saldo Total é R$: ", Saldo) 
fimalgoritmo 
 
8. Crie um algoritmo que leia o valor do salário mínimo e o valor do salário de 
uma pessoa para calcular e exibir quantos salários mínimos ela ganha. 
algoritmo "Salário" 
 
var 
Salmin, Salario, Quantidade: Real 
 
inicio 
 
Escreva ("Digite o Valor do Salário Mínimo: ") 
Leia (Salmin) 
Escreva ("Insira o Valor do Seu Salário: ") 
Leia (Salario) 
Quantidade <- (Salário / Salmin) 
Escreval ("Você recebe ", Quantidade, "Salários" 
 
fimalgoritmo 
 
9. Crie um algoritmo que leia dois números e exiba o quadrado da diferença do 
primeiro valor pelo segundo e a diferença dos quadrados. 
algoritmo "Diferenças de Quadrado" 
 
var 
 
n1: Inteiro 
n2: Inteiro 
Q: Real 
Di: Real 
 
inicio 
 
Escreva("Digite o Primeiro Numero: ") 
Leia(n1) 
Escreva ("Digite o Segundo Numero: ") 
 Leia (n2) 
Q <- (n1 - n2)^2 
Escreval ("O Quadrado da diferença é ", Q) 
Di <- (n1^2 - n2^2) 
Escreval("A Diferença dos Quadrados é ", Di) 
fimalgoritmo 
 
10. Crie um algoritmo que leia um horário qualquer (hora e minuto) e informe 
quantos minutos se passaram desde o início do dia. 
algoritmo "Horario" 
 
var 
H, min, total: Real 
inicio 
 
escreva ("Digite a hora: ") 
leia (H) 
escreva ("Digite o minuto: ") 
leia (Min) 
total <- ((H * 60) + min) 
escreval ("Os minutos decorridos desde 00:00hs : ", total) 
fimalgoritmo 
 
11. Crie um algoritmo que leia quatro números e exiba a média ponderada, 
sabendo-se que os pesos são respectivamente: 1, 2, 3 e 4. 
algoritmo "Média Ponderada" 
 
var 
n1, n2, n3, n4, mp : real 
inicio 
 
Escreva ("Digite 1º Número: ") 
Leia (n1) 
Escreva ("Digite 2º Número: ") 
Leia (n2) 
Escreva ("Digite 3º Número: ") 
Leia (n3) 
Escreva ("Digite 4º Número: ") 
Leia (n4) 
 mp <- (n1*1 + n2*2 + n3*3 + n4*4) / (1 + 2 + 3 + 4) 
Escreval ("A Média Ponderada é igual a ",mp) 
fimalgoritmo 
 
 
12. Crie um algoritmo que efetue e exiba o cálculo do salário líquido de um 
professor. Os dados fornecidos são: valor da hora aula, número de aulas dadas 
no mês e percentual de desconto do INSS. 
algoritmo "Salário" 
 
var 
S, CS, Vh, NA, P :Real 
inicio 
 
 Escreva ("Digite Seu Salario Bruto: ") 
 Leia (S) 
 Escreva ("Digite o Valor da Hora Aula: ") 
 leia (Vh) 
 Escreva ("Digite o Numero de Aula Mes: ") 
 Leia (NA) 
 Escreva ("Digite o Desconto INSS: ") 
 Leia (P) 
 CS <- (S -(Vh*NA)+ (S*P/100)) 
 Escreval ("Seu Salário é: ", CS) 
fimalgoritmo 
 
13. Sabendo que 100 quilowatts de energia custa um décimo do salário mínimo 
fazer um algoritmo que receba o valor do salário mínimo e quantidade de 
quilowatts gasta por uma residência e calcule e imprima: valor em reais de 
cada quilowatt, valor em reais a ser pago e o novo valor a ser pago pela 
residência com um desconto de 10%. 
 
algoritmo "KW" 
 
var 
deci, salmin, kw, vkw, desconto : real 
 
inicio 
 
escreva("Digite o valor do salário mínimo: ") 
leia (salmin) 
escreva ("Quantidade de KW gasto em sua Residencia: ") 
Leia (kw) 
deci <- (salmin/10)/100 
vkw <- (deci*kw) 
desconto <- (vkw*0.9) 
escreval ("O valor do KW é: ", deci) 
escreval ("Total a ser pago: ", vkw) 
Escreval ("Valor com desconto: ", desconto) 
 
 
fimalgoritmo 
 
14. Crie um algoritmo que efetue o cálculo da quantidade de litros de combustível 
gastos em uma viagem, sabendo que o carro faz 12 Km com um litro. Deverão 
ser fornecidos o tempo gasto na viagem e a velocidade média. O algoritmo 
deverá apresentar os valores da distância percorrida e a quantidade de litros 
utilizada na viagem. Utilizar as seguintes fórmulas: 
 
algoritmo "Gasto Gasolina" 
 
var 
Tempo,VelociMed,Distanci,LitUs : real 
 
inicio 
 
 Escreva("Digite o tempo gasto: ") 
 Leia (Tempo) 
 Escreva ("Digite a velocidade média: ") 
 Leia (VelociMed) 
 Distanci <- Tempo*VelociMed 
 LitUs <- Distanci/12 
 LIMPATELA 
 EscrevaL ("Tempo Gasto: ", Tempo) 
 EscrevaL ("Velocidade Média: ",VelociMed) 
 EscrevaL ("A distância é de ",Distanci) 
 EscrevaL ("A quantidade de litros usados é ",LitUs) 
 
fimalgoritmo 
 
 
15. Crie um algoritmo que leia a quantidade de fitas que uma locadora de vídeo 
possui e o valor que ela cobra por aluguel, mostrando as informações pedidas a 
seguir: 
 
algoritmo "Fitas"var 
qf: Inteiro 
V_a: Real 
Van: Real 
atraso: Real 
Qfi: real 
 
inicio 
escreva ("Insira a Quantidade total de Fitas: ") 
Leia (qf) 
Escreva ("Digite o Valor do Aluguel: ") 
leia (V_a) 
Van <- ((qf/3)* 12) 
escreval ("Faturamento anual R$: ", Van) 
atraso <- ((qf/3)*0.1) 
escreval ("Valor de Atraso R$: ", atraso) 
Qfi <- (qf - (qf* 0.02)) + (0.1 * qf) 
escreval ("Nova quantidade de Fita: ", Qfi) 
 
fimalgoritmo