Question

Calcule e exiba a quantidade de dinheiro gasto por um fumante. Os dados de entrada são: o número de anos que ele fuma, o número de cigarros fumados por dia e o preço de uma carteira com 20 cigarros. Considere 365 dias por ano, neste caso.
no visualg

Answer 1

Eu não possuo o Visualg, mas posso fazer aqui de forma semelhante:

* Vamos multiplicar o ano informado por 365
* Vamos multiplicar o número de cigarros pelo nº de dias
* Vamos pegar a quantidade total de cigarros e dividir por 20 e multiplicar pelo preço

algoritmo "CalcCigar"

var
anos, cigarros: inteiro
preco: real

 inicio
  escreva("Informe o nº de cigarros fumados por dia: ")
  leia(cigarros)
 
  escreva("Informe o nº de anos que fuma: ")
  leia(anos)

  escreva("Informe o preço do maço: ")
  leia(preco)

  anos <- anos * 365
  cigarros <- cigarros * anos
  preco <- preco * (cigarros/20)

  escreva("Total gasto é: "+preco)

fimalgoritmo