Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- algoritmo "ex03_repREF"
- // Renato ex03_repeticaoREFORÇO
- var
- entrada: inteiro
- base, altura: real
- inicio
- repita
- escreval("Digite qual forma você quer calcular:")
- escreval("1 - área de um triângulo")
- escreval("2 - área de um círculo")
- escreval("3 - área de um cubo")
- escreval("4 - área de um cilindro")
- leia(entrada)
- escolha(entrada)
- caso(1)
- escreval("Digite a base")
- leia(base)
- escreval("Digite a altura")
- leia(altura)
- escreval("Área do triângulo: ", (base*altura)/2)
- caso(2)
- escreval("Digite o raio")
- leia(base)
- escreval("Área do círculo: ", (base*base*Pi))
- caso(3)
- escreval("Digite a medida da aresta")
- leia(base)
- escreval("Área do cubo: ", (6*(base*base)))
- caso(4)
- escreval("Digite o raio")
- leia(base)
- escreval("Digite a altura")
- leia(altura)
- escreval("Área do cilindro: ", ((2*(Pi)*(base)*(altura))+((Pi)*(base*base))))
- outrocaso
- escreval("Entrada inválida!")
- fimescolha
- escreval("Continuar? 1 para sim, 0 para não")
- leia(entrada)
- se(entrada)=(0) entao
- interrompa
- fimse
- ate 0=1
- escreval("Operação finalizada pelo usuário.")
- fimalgoritmo
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement