L2 - 14 - Escreva um algoritmo que calcule a quantidade de latas de tinta, descrito abaixo.

Escreva um algoritmo que calcule a quantidade de latas de tinta necessárias e o custo para pintar tanques cilíndricos de combustível, onde são fornecidos a altura (h ) e o raio ( r ) desse cilindro. Sabe-se que a lata de tinta anticorrosiva custa R$ 40.00, cada lata contem 5 litros e cada litro pinta 3 metros quadrados na média. Para que fique bem coberto de tinta, há necessidade de 2 demãos.



Algoritmo "Calcula a quantidade de latas necessarias"
 //Autor: Guilherme Paulino
 //Data: 02/09/2010
Var
  h, r, mq, qt, qtdl, lts, preco, precot: numerico
Inicio
  Escreva("Informe a altura de cada tanque: ")
  Leia(h)
  Escreva("Informe o raio de cada tanque: ")
  Leia(r)
  Escreva("Informe a quantidade de tanques a serem pintados: ")
  Leia(qt)
  mq <- (2*3.14*r*h) + (2*3.14*r^2)
  qtdl <- ( mq /3 ) * 2
  lts <- ( qtdl / 5)
  preco <- ( lts * 40 )
  precot <- preco * qt
  Escreval("A quantidade de tinta necessaria sera de ",qtdl:5:2," litro(s).")
  Escreval("Sendo necessarias ",lts:5:2," lata(s) de tinta.")
  Escreval("E o custo por tanque será de R$ ",preco:5:2)
  Escreval("multiplicado por ", qt:5:2," tanque(s), custara R$ ",precot:5:2)
Fimalgoritmo