Algoritmo Inversão da ordem dos algarismos

[anderson.hipolito 0]

Não levem o nome da postagem em consideração, eu ia postar outra coisa e saiu "Inversão da ordem"
mas vamos lá:

Olá amigos venho com esse problema que não estou conseguindo solucionar no VisualG nem no Portugol.
Se alguém se propuser a solucionar eu fico imensamente grato:

 

 

Elabore algoritmo que contenha funções que solucionem os problemas abaixo. As funções devem estar agrupadas em um único algoritmo, dentro de um laço infinito que use a estrutura de controle <Enquanto> ou <Repita até>. Use a chamada as funções dentro da estrutura de controle < caso...de... escolha > utilize o comando pare para sair da estrutura de controle caso (50 pontos):

a. Determinar a área de um círculo conhecendo seu raio.

Fórmula A = π * r² - em que r representa o raio do círculo.

 

b. Determinar o volume de um cone conhecendo-se os valores da altura e o do raio da base.

Fórmula: V = π r² . h em que h representa a altura e r representa o raio da base do cone.

 

 

c.Determinar a área de um Paralelogramo

Fórmula S = b * h - em que h representa a altura e b representa a medida da base do Paralelogramo.

 

d. Calcule a superfície de um losango:

Fórmula S = em que d1 e d2 são diagonais do losango.

[Eisenheim 67]

Olá amigos.

 

Amigo anderson.hipolito, primeiramente lhe desejo as boas vindas. Peço que compartilhe conosco parte do que já tenha feito expondo o ponto em que se encontra sua dúvida para que assim possamos analisar e te orientar.

 

Pelo que entendi, você terá um menu com opções onde cada opção é referencia a uma função cujo propósito está de acordo com os itens: a, b, c e d.

 

Um rascunho semelhante a isso:

 

algoritmo "Alg"

 

funcao CalculaItemA: real

inicio

..

fimfuncao

 

funcao CalculaItemB: real

inicio

..

fimfuncao

funcao CalculaItemC: real

inicio

..

fimfuncao

funcao CalculaItemD: real

inicio

..

fimfuncao

var

vOpc: caractere

inicio

 

Repita

Leia( vOpc )

escolha vOpc

caso A

CalculaItemA

caso B

CalculaItemB

caso C

CalculaItemC

caso D

CalculaItemD

Ate vOpc='S'

fimalgoritmo

 

Isso é apenas um rascunho, mas acredito que seria algo nesse sentido o que você tem que fazer.

 

Até a próxima. :thumbsup:

[anderson.hipolito 0]

Obrigado Jeferson. Vou olhar com mais tempo e posto aqui a evolução desse algoritmo.

 

Mais uma vez obrigado