Question

Escreva um programa em PORTUOL(VISUAL3.0) para calcular a redução do tempo de vida de um fumante. Pergunte a
quantidade de cigarros fumados por dias e quantos anos ele já fumou. Considere que um
fumante perde 10 min de vida a cada cigarro. Calcule quantos dias de vida um fumante
perderá e exiba o total em dias.

Answer 1

Resposta:

cigarrosd,anos,vida: real

escreval ("Digite quantos cigarros você fuma por dia")

leia (cigarrosd)

escreval ("Digite quantos anos você ja fuma?")

leia (anos)

cigarrosd = cigarrosd * 10

cigarrosd = cigarrosd / 60

cigarrosd = cigarrosd / 24

anos = anos * 365

vida = cigarros * anos

escreval ("Forram tirados" , vida, " dias de sua vida.")

AVISO (DÊ UMA VERIFICADA SE ESTÁ TUDO CERTO PARA RODAR NO VISUALG)

Explicação:

Answer 2

Resposta:

algoritmo "CalcDiasPerd"

var

  qd, af: inteiro

  dp: real

inicio

     Escreval("------------------------------------")

     Escreval("      Redução de vida Fumante")

     Escreval("------------------------------------")

     Escreva("Quantos maços usados por dia: ")

     leia(qd)

     Escreva("Quantos anos já fumou: ")

     leia(af)

             dp <- qd*af*365*(1/144)

     Escreval("------------------------------------")

     Escreval("Perdeu", dp, " dias de vida")

     Escreva("------------------------------------")

fimalgoritmo

Explicação:

A lógica utilizada foi inicialmente fazer com que o usuário colocasse na variável (qd) a quantidade de maços utilizados em 1 dia, já a variável (af), o usuário colocou quantos anos ele fumou. Assim, pegando a quantidade de anos que o indivíduo fumou (af) e multiplicando por 365, você tem a quantidade em DIAS que ele fumou. O enunciado disse que, a cada 1 cigarro utilizado uma pessoa perde 10 min de vida, mas precisamos saber em dias essa informação, então vamos dividir 10 min por 60, para transformar em horas, e depois dividir por 24.

Ficando assim: $\frac{10}{60}$ --->  $\frac{1}{6}$ --->  agora dividindo por 24 ----> $\frac{1}{6}$×$\frac{1}{24}$ ---> $\frac{1}{144}$ , ou seja, a cada cigarro fumado, a pessoa perde $\frac{1}{144}$ dias de vida.

Sendo assim:    (af*365) = Quantidade de dias fumados                                                                

                                                                 X

                          (qd)*($\frac{1}{144}$) = Quantidade de dias perdidos em 1 dia fumando (qd) quantidades.

                                                                  =  Quantidade de dias de vida o fumante perdeu.

Para transcrever isso para linguagem do Visualg 3, foi criado uma nova variável (dp) para atribuir a ela o resultado pedido pelo exercício.