Aula 05 - 20/04/11

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 "Exercicio 1"

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 "Exercicio 2"

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 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 "Exercicio 3"

var

      preco_fabrica, percentual_lucro, percentual_imposto, preco_final, valor_impostos, valor_lucro, preco_imposto :real

inicio

      escreval("Digite o preço de Fabrica do seu automovel: ")

      leia (preco_fabrica)

      escreval("Digite o percentual de lucro: ")

      leia (percentual_lucro)

      escreval("Digite o percentual de imposto: ")

      leia (percentual_imposto)

      valor_impostos <- preco_fabrica * percentual_lucro /100

      valor_lucro <- preco_fabrica * percentual_imposto /100

      preco_final <- preco_fabrica + valor_impostos + valor_lucro

      escreval("Lucro do distribuidor: ", valor_lucro)

      escreval("Impostos: ", valor_impostos)

      escreval("Preço Final: ", preco_final)

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 "Exercicio 4"

var

peso_saco, racao_gramas, quantidade_racao, resta_no_saco, kg, gato1, gato2 :real

   inicio

   escreval("Peso do saco de ração: ")

   leia (peso_saco)

   escreval("Quanto o primeiro gato come por dia? : ")

   leia(gato1)

   escreval("Quanto o Segundo gato come por dia?: ")

   leia(gato2)

   racao_gramas <- peso_saco * 1000

   quantidade_racao <- (gato1 + gato2)

   resta_no_saco <- racao_gramas - ( quantidade_racao * 5000  )

   kg <- resta_no_saco / 1000

   escreval("Após cinco dias restará: ", kg, " kg 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 "Exercicio 5"

var

altura_degrau, altura_alcancar, subir_degraus :real

inicio

     escreval("Digite a altura que deseja alcançar: ")

     leia (altura_alcancar)

     escreval("Digite a altura do degrau: ")

     leia (altura_degrau)

     subir_degraus <- altura_alcancar / altura_degrau

     escreva ("Você devera subir: ", subir_degraus, " de graus")

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 "Exercicio 6"

var

diagonal_maior, diagonal_menor, Area :real

inicio

     escreval("Digite a digonal maior do seu losango: ")

     leia (diagonal_maior)

     escreval("Digite a digonal menor do seu losango: ")

     leia (diagonal_menor)

     Area <- (diagonal_maior * diagonal_menor)/2

     escreval("A área do logango é : ", 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 "Exercicio 7"

var

ano_nacimento, idade_anos, idade_meses, idade_dias, idade_semana, ano_atual :real

inicio

      escreval ("Digite o seu ano de nacimento: ")

      leia (ano_nacimento)

      escreval ("Digite o ano atual: ")

      leia (ano_atual)

      idade_anos <-  ano_atual - ano_nacimento

      idade_meses <- idade_anos * 12

      idade_dias <- idade_anos * 360

      idade_semana <- idade_anos * 48

      escreval ("Sua idade em anos é: ", idade_anos, " anos")

      escreval ("Sua idade em meses é: ", idade_meses, " meses")

      escreval ("Sua idade em dias é: ", idade_dias, " dias")

      escreval ("Sua idade em semanas é: ", idade_semana, " 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 "Exercicio 8"

var

dolar, marco_alemao, libra_esterlina, reais :real

inicio

      escreval("Digita a quantidade em reais que você deseja converter: ")

      leia (reais)

      dolar <- reais / (166 / 100)

      marco_alemao <- reais / 2

      libra_esterlina <- reais / (157 / 100)

      escreval ("Sua quantidade em dólar é: ", dolar, " dólares")

      escreval ("Sua quantidade em marco alemão é: ", marco_alemao, " marco alemao")

      escreval ("Sua quantidade em libra esterlina é: ", libra_esterlina, " libra esterlina")

fimalgoritmo

Começamos a aprender alguns comandos novos, também foi posto pelo prof em aula, que cada pessoa tem um pensamento lógico diferente assim sendo cara algoritmo feito vai ter diferença de algoritmo para algoritmo, se 3 pessoas fizer um algoritmo resolvendo o mesmo problema irá notar que as 3 formas de resolver foram diferentes mas as 3 estão corretas.