sábado, 4 de setembro de 2010

2-14) Escreva um algoritmo que calcule a quantidade de latas de tinta necessárias e o custo para pintar

algoritmo "Pintar Cilindro"




var

qtdLatas, custoPinCilindro, altura, raio, raioR,: real

inicio

escreval ("Pintar Cilindro")

escreva ("informe a altura: ")

leia (h)

escreva ("informe o raio: ")

leia (raio)

escreva ("informe o raio r: ")

leia (raioR)

areaTotal <- 2.raio.3.14(h+raioR)*2

Nenhum comentário:

Postar um comentário