O Volume de Figuras Geométricas: Cilindro ou Cone Reto ou Esfera.

Construir um algoritmo que efetue a o calculo do volume de Figuras Geométricas: Cilindro ou  Cone Reto ou Esfera.

O Algoritmo deverá possuir um Cardápio opções para que o usuário possa escolher qual figura deseja calcular o Volume. No final do algoritmo deverá ter uma estrutura de repetição para perguntar ao usuário se ele quer fazer um novo calculo ou terminar o programa.

Cilindro:

[pic 1]

Cone Reto

[pic 2]

Esfera:

[pic 3]algoritmo "Calculo Volume"

var
Raio, Altura, Volume:
Menu real : Inteiro
continuar: caractere
inicio
continuar <- "Sim"
enquanto continuar = "Sim" faca // Laço que controla no fluxo

Escreva ("Deseja Continuar? Sim ou Não:")
Leia (continuar)
Fimenquanto // fim do controle do Fluxo
fimalgoritmo

algoritmo "Calculo Volume"
var
Raio, Altura, Volume:
Menu real : Inteiro
continuar: caractere
inicio
continuar <- "Sim"
Enquanto continuar = "Sim" faca // Laço que controla nenhum fluxo
Escreval ("Menu de Opções:")
Escreval ("Dgite 1 para calcular o volume do Cilindro:")
Escreval ("Dgite 2 para calcular o volume do Cone Reto:")
Escreval ("Dgite 3 para calcular o volume Esfera:")
Leia (menu)
Limpatela
se menu = 1 Entao
Escreval ("Informe o valor do Raio em cm:")
Leia (Raio)
Escreval ("Informe o valor da altura em cm:")
Leia (Altura)
Volume <- PI * Raio ^ 2 * Altura
Escreval ("#####################################################")
Escreval ("O Volume do Cilindro é:", Volume, "cm³")
Escreval ("###################################### ################## ")
Fimse
se menu = 2 Entao
Escreval (" Informe o valor do Raio em cm: ")
Leia (Raio)
Escreval (" Informe o valor da altura em cm: " ) Volume
Leia (Altura)
<- (PI * Raio ^ 2 * Altura) / 3
Escreval ("################################## ###################### ")
Escreval (" O Volume do Cone Reto é: ", Volume," cm³ ")
Escreval (" ############ ############################################ ")
Fimse
se menu = 3 Entao
Escreval (" Informe o valor do Raio em cm:")
Leia (Raio)
Volume <- 4 * (PI * Raio ^ 3) / 3
Escreval ("#####################################################")
Escreval ("O Volume da Esfera é:", Volume, "cm³")
Escreval ("#################################################################################### ################## ")
Fimse
Escreval (" ")
Escreval (" ")
Escreva (" Deseja Continuar? Sim ou Não: ")
Leia (continuar)
Limpatela
Fimenquanto // fim do controle do Fluxo
fimalgoritmo

[Monday 11:38 AM] Paulo Cesar da Silva Emanuel

algoritmo "Calculo Volume" var Raio, Altura, Volume: Menu real : Inteiro continuar: caractere inicio continuar <- "Sim" Enquanto continuar = "Sim" faca // Laço que controla nenhum fluxo Escreval ("Menu de Opções:") Escreval ("Dgite 1 para calcular o volume do Cilindro:") Escreval ("Dgite 2 para calcular o volume do Cone Reto:") Escreval ("Dgite 3 para calcular o volume Esfera:") Leia (menu) Limpatela Escolha (menu) caso 1 Escreval ("Informe o valor do Raio em cm:") Leia (Raio) Escreval ("Informe o valor da altura em cm:") Leia (Altura) Volume <- PI * Raio ^ 2 * Altura Escreval ("#####################################################") Escreval ("O Volume do Cilindro é:", Volume, "cm³") Escreval ("###################################### ################## ") caso 2 Escreval (" Informe o valor do Raio em cm: ") Leia (Raio) Escreval (" Informe o valor da altura em cm: ") Leia (Altura ) Volume <- (PI * Raio ^ 2 * Altura) / 3 Escreval ("##################################################################################### ################ ") Escreval (" O Volume do Cone Reto é: ", Volume," cm³ ") Escreval (" ################# ################################################## ") caso 3 Escreval (" Informe o valor do Raio em cm: ") Leia (Raio) Volume <- 4 * (PI * Raio ^ 3) / 3 Escreval (“######################################### ########## ") Escreval ("O Volume da Esfera é:", Volume, "cm³") Escreval ("#################################### ################### ") Fimescolha Escreval (" ") Escreval (" ") Escreva (" Deseja Continuar? Sim ou Não: ") Leia (continuar) Limpatela Fimenquanto // fim do controle do Fluxo fimalgoritmo