Postagem aula 4

Exercícios para aula 4 – Fazer no software visualg.


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) milhas




algoritmo "Converte_Pes"


 Converter Pes em (polegadas, jardas e milhas)


var
 pes, polegadas, jardas, milhas: real
inicio
 escreva ("Digite a quantidade de pes a ser convertidos: ")
 leia (pes)
 polegadas <- pes * 12
 jardas <- pes / 3
 milhas <- pes / 1760
 escreva ("Polegadas:", polegadas, "  Jardas:", jardas, ")   Milhas:", milhas)
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 "Sua_Idade"


var
  ano_nacimento, ano_atual, idade_futura, idade_atual :real
inicio
      escreva ("Digite o ano que você naceu: ")
      leia (ano_nacimento)
      escreva ("Digite o ano atual: ")
      leia (ano_atual)
      idade_atual <- ano_atual - ano_nacimento
      idade_futura <- 2010 - ano_nacimento
      escreva ("Você tem :", idade_atual, "  Você tinha :",         idade_futura )
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 imposto.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.




inicio
 escreva ( "digite o preço de fábrica seguido do lucro e do   imposto:")
 leia( pf, plucro, p_imp )
 lucroD <- (pf*plucro)/100;
 Vimp <- (pf*p_imp)/100;
 custoC <- pf+lucroD+Vimp;
 escreva(" lucro do revendedor ", lucroD, " valor do imposto    sobre o preço de fabrica ", Vimp , " Valor Final do       veículo ", custoC)
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 "gatos"
var
 rac5,racsobra,g1,g2,racsaco:real
inicio
escreva ("digite kg saco,em seguida digite quantia do 1ºgato e após digite quantia 2ºgato:")
leia(racsaco,g1,g2)
rac5 <- (g1/1000 + g2/1000)*5;
racsobra <- racsaco-rac5;
escreva( "ração restante será:",racsobra,"kg")
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 "escadas"
var
  hdeg,hdes,qntdegr:real
 inicio
  escreva("digite a altura que deseja subir e após a altura     do degrau há ser subido:")
  leia(hdes,hdeg,)
  hdeg<-hdeg/100;
  qntdegr<- (hdes/hdeg);
  escreva("deverá subir",qntdegr, "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 "Area do losango"


var
 diagM,diagmenor,A:real
inicio
  escreva("digite a diagonal maior do losango e em seguida a    diagonal menor:")
  leia(diagM,diagmenor)
  A<-(diagM*diagmenor)/2
  escreva("A área do losango será:",A)
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 "idade"


var:
idadan,idademes,idadedias,idadesemanas,anoatual,anonasc:real
inicio
  escreva("Digite o ano de nascimento e em seguida o ano    atual:")
  leia(anonasc,anoatual)
  idadan <- anoatual-anonasc;
  idademes <- (anoatual-anonasc)*12;
  idadedias <- (anoatual-anonasc)*365;
  idadesemanas <- (anoatual-anonasc)*12*4;
  escreva("essa pessoa tem",idadan,"anos", idademes,"meses    de vida", idadedias,"dias de vida",idadesemanas ,"    semanas de vida")
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 "conversor de moeda"


var
 dolar,reais,marcoalemao,libraesterlina:real
inicio
  escreva("digite o valor em reais a ser convertido:")
  leia(reais)
  dolar<- reais*(166/100)
  marcoalemao<-reais*2
  libraesterlina<-reais*(157/100)
  escreva(dolar ,  " dólares," , marcoalemao, " marcos e "     libraesterlina, " libras. ")
fimalgoritmo






Reflexão da aula: Nessa aula aprendi que não basta apenas saber lógica e algoritmo tem de se praticar muito
para poder resolver os problemas com mais facilidade.