Aula 5 – 20.04.2011 Logica e Algoritmos

Aula 5 – 20.04.2011 Logica e Algoritmos

Nossa 5ª, hoje fizemos mais exercícios. Foi apresentado pelo professor Jossandro, um Software chamado VISUALG que com ele é capaz fazermos os Algoritmos sem precisar escrever no papel e ele nos mostra possíveis erros.  Executamos através desse mesmo programa para testá-lo e ver se deu certo.

1- Sabendo-se que:
    1 pé = 12 polegadas
    1 jarda = 3 pés
    1 milha = 1.760 jardas
Faça um programa que receba uma medida em pés, faça as conversões a seguir e mostre os resultados em:
a) polegadas b) jardas c) milha

algoritmo "exec_01_aula5"
var
   pe,polegada,jarda,milha:real
inicio
   escreva("Escreva a medida de pés: ")
   leia(pe)
   polegada<-pe*12
   jarda<-pe*3
   milha<-1.760*jarda
   escreval("O numero em polegadas é",polegada,".")
   escreval("O numero em jardas é",jarda,".")
   escreval("O numero em milhas é",milha,".")
fimalgoritmo

2- Faça um programa que receba o ano de nascimento de uma pessoa e o ano atual, calcule e mostre:

 a) a idade dessa pessoa;

 b) quantos anos essa pessoa terá em 2010.

algoritmo "exec_02_aula5"

var

   a_atual,a_nasc,idade,idade_otro,ano:inteiro

inicio

   escreva("Em que anos nos estamos? ")

   leia(a_atual)

   escreva("Por favor digite o ano do seu nascimento: ")

   leia(a_nasc)

   ano<-2010

   idade<-a_atual-a_nasc

   idade_otro<-ano-a_nasc

   escreval("Neste ano você completa/completou",idade," Anos.")

   escreval("E em",ano," você terá",idade_otro," Anos.")

fimalgoritmo

3- O custo ao consumidor de um carro novo é a soma do preço de fábrica com o percentual de lucro do distribuidor e dos impostos aplicados ao preço de fábrica. Faça um programa que receba o preço de fábrica de um veículo, o percentual de lucro do distribuidor e o percentual de impostos. Calcule e mostre:

 a) o valor corespondente ao lucro do distribuidor;

 b) o valor correspondente aos impostos;

 c) o preço final do veículo.

algoritmo "exec_03_aula5"

var

   p_fab,p_dist,p_imp,porc,v_dist,v_imp,total:real

inicio

   escreva("Quanto custa o caro no preço de fabrica: ")

   leia(p_fab)

   escreva("Qual a porcentagem da distribuidora: ")

   leia(p_dist)

   escreva("Qual a porcentagem de imposto: ")

   leia(p_imp)

   porc<-p_fab/100

   v_dist<-porc*p_dist

   v_imp<-porc*p_imp

   total<-p_fab+v_dist+v_imp

   escreval(p_dist,"% equivalem a $",v_dist," do preço total.")

   escreval(p_imp,"% equivalem a $",v_imp," do preço total.")

   escreval("O preço total do veiculo é $",total,".")

fimalgoritmo

4- Pedro comprou um saco de ração com peso em quilos. Pedro possui dois gatos para os quais fornece a quantidade de ração em gramas. Faça um programa que receba o peso do saco de ração e a quantidade de ração fornecida para cada gato. Calcule e mostre quanto restará de ração no saco após cinco dias.

algoritmo "exec_04_aula5"

var

   g1,g2:caracter

   r_kg,r_gr,gato1comeu,gato2comeu,resto:real

   dias:inteiro

inicio

   escreva("Qual o nome do seu primeiro gato: ")

   leia(g1)

   escreva("Qual o nome do seu segundo gato: ")

   leia(g2)

   escreva("Escreva a quantidade de ração em Kg comprada: ")

   leia(r_kg)

   r_gr<-r_kg*1000

   escreva("Escreva a qauntidade de ração dada ao ",g1," por dia: ")

   leia(gato1comeu)

   escreva("Escreva a qauntidade de ração dada ao ",g2," por dia: ")

   leia(gato2comeu)

   dias<-5    //numero de dias

   resto<-(r_gr-((gato1comeu+gato2comeu)*dias))

   escreva("Apos",dias," dias resta",resto,"gr de ração.")

fimalgoritmo

5- Cada degrau de uma escada tem X de altura. Faça um programa que receba essa altura e a altura que o usuário deseja alcançar subindo a escada. Calcule e mostre quantos degraus o usuário deverá subir para atingir seu objetivo, sem se preocupar com a altura do usuário.

algoritmo "exec_05_aula5"

var

   alt,deg,n_deg:real

inicio

   escreva("Qual a altura que deseja alcançãr subindo a escada: ")

   leia(alt)

   escreva("Qual o tamanho do degrau: ")

   leia(deg)

   n_deg<-alt/deg

   escreva("Para subir",alt," são nescesarios",n_deg," degraus.")

fimalgoritmo

6- Faça um programa que calcule e mostre a área de um losango.

Sabe-se que A = (diagonal maior * diagonal menor)/2:

algoritmo "exec_06_aula5"

var

   alt,lag,area:real

inicio

   escreva("Escreva a altura do losango: ")

   leia(alt)

   escreva("Escreva a largura do losango: ")

   leia(lag)

   area<-((alt*lag)/2)

   escreva("A area do losango é de",area,".")

fimalgoritmo

7- Faça um programa que receba o ano de nascimento de uma pessoa e o ano atual, calcule e mostre:

 a) a idade dessa pessoa em anos;

 b) a idade dessa pessoa em meses;

 c) a idade dessa pessoa em dias;

 d) a idade dessa pessoa em semanas.

algoritmo "exec_07_aula5"

var

   ano,ano_nasc,meses,dias,semanas,anos:real

inicio

   escreva("Escreva, em que ano nos estamos: ")

   leia(ano)

   escreva("Escreva, ano em que você nasceu: ")

   leia(ano_nasc)

   anos<-ano-ano_nasc

   meses<-anos*12

   dias<-anos*365

   semanas<-dias/7

   escreval("Você tem",anos," anos.")

   escreval("Você tem",meses," meses.")

   escreval("Você tem",dias," dias.")

   escreval("Você tem",semanas," semanas.")

fimalgoritmo

8- Faça um programa que receba a quantidade de dinheiro em reais e converta esse valor em dólar, marco alemão e libras esterlinas. Sabe-se que a cotação do dólar é de R$ 1,66, do marco alemão é de R$ 2,00 e da libra esterlina é de R$ 1,57. O programa deve fazer a conversão e mostrá-las.

algoritmo "exec_08_aula5"

var

   reais,dolar,m_a,libra:real

inicio

   escreva("Quantos Reais? ")

   leia(reais)

   dolar<-reais*1.66

   m_a<-reais*2

   libra<-reais*1.57

   escreval(reais," Reais em Dólares são",dolar,".")

   escreval(reais," Reais em Marco Alemão é",m_a,".")

   escreval(reais," Reais em Libras Esterlinas são",libra,".")

fimalgoritmo