VisualG Função "caso" do VISUALG

calimonia · 26 de junho de 2010

var
   cont:inteiro
   modelo,outro:caracter
inicio
   escreva("entre com o modelo do calçado:")
   leia(modelo)
   escolha modelo
   caso "mocassim"
      escreval("o modelo do calçado é masculino.")
   caso "rasteirinha"
      escreval("o modelo do calçado é feminino.")
   outro caso
      leia(outro)
      escreval("o calçado é infantil.")
   fimescolha
fimalgoritmo

Alguém pode me ajudar a achar o erro desse fluxograma???

O que eu quero é que quando o usuário entrar com o nome do modelo o programa diga se é masculino (mocassim) ou feminino (rasteirinha), e se for outro nome de modelo que ele diga que é infantil. Mas quando eu testo, o programa nao diz que é infantil quando eu coloco outro nome de modelo.

Se alguém puder me ajudar, estou desesperado!!!

Abraços, Felipe.

Kreitos · 28 de junho de 2010

var
   cont:inteiro
   modelo,outro:caracter
inicio
   escreva("entre com o modelo do calçado:")
   leia(modelo)
   escolha modelo
   caso "mocassim"
      escreval("o modelo do calçado é masculino.")
   caso "rasteirinha"
      escreval("o modelo do calçado é feminino.")
   outro caso
      leia(outro) //<- RETIRE ESSA LINHA[/COLOR][/B]
      escreval("o calçado é infantil.")
   fimescolha
fimalgoritmo

Provavelmente seja a linha que está marcada, retire e mande escrever assim:

escreval("O CALÇADO ",modelo," É INFANTIL")

tinho ale · 23 de abril de 2013

A função outro caso é junto, outrocaso!

outrocaso
leia(outro)
escreval("o calçado é infantil.")
fimescolha
fimalgoritmo

Acredito que nao adiante mais, mesmo assim deixo comentado!

Pabloods · 20 de maio de 2013

Se fosse eu usaria a função se

Cavudas · 13 de novembro de 2013

Kreitos disse:


var
   cont:inteiro
   modelo,outro:caracter
inicio
   escreva("entre com o modelo do calçado:")
   leia(modelo)
   escolha modelo
   caso "mocassim"
      escreval("o modelo do calçado é masculino.")
   caso "rasteirinha"
      escreval("o modelo do calçado é feminino.")
   outro caso
      leia(outro) //<- RETIRE ESSA LINHA[/COLOR][/B]
      escreval("o calçado é infantil.")
   fimescolha
fimalgoritmo

Provavelmente seja a linha que está marcada, retire e mande escrever assim

Tire a var "outro" não a necessidade

No exemplo Kreitos o da o certo seria.

escreval("O CALÇADO ",modelo," É INFANTIL")

Escreval("O CALÇADO" ,modelo)
Escreva("É INFANTIL")

Antonio Carlos Nenê Crepaldi · 21 de janeiro de 2018

var
   cont:inteiro
   modelo,outro:caracter
inicio
   escreva("entre com o modelo do calçado: ")
   leia(modelo)
   escolha modelo
   caso "mocassim"
      escreval("o modelo do calçado é masculino.")
   caso "rasteirinha"
      escreval("o modelo do calçado é feminino.")
   SENAO
   OUTROCASO
      escreval("o calçado é infantil.")
   fimescolha
fimalgoritmo

Simon Viegas · 22 de janeiro de 2018

Olá @Antonio Carlos Nenê Crepaldi. Seja bem vindo ao Fórum do Clube do Hardware.

Você apenas postou um código, sem quaisquer comentários... mas vamos lá:

Algoritmo "semnome"
var
   {cont:inteiro} //não está sendo utilizado
   {modelo, outro :caracter} //não está sendo utilizado
   modelo :caracter
inicio
escreva("entre com o modelo do calçado: ")
leia(modelo)
escolha modelo
   caso "mocassim"
      escreval("o modelo do calçado é masculino.")
   caso "rasteirinha"
      escreval("o modelo do calçado é feminino.")
   {SENAO} //sintaxe incorreta (apesar de não dá erro)
   OUTROCASO
      escreval("o calçado é infantil.")
fimescolha
fimalgoritmo

Resumidamente: no escolha/caso não tem senao.

No aguardo.

VictorHC82 · 24 de fevereiro de 2022

Não encontrei nada pela internet, então concluo que o ESCOLHA-CASO só funciona com NÚMEROS e no caso de caractere se tiver apenas 1 caractere. Se você escrever palavras como "mocassim" e "rasteirinha", não funciona. Tente utilizar números para representar esses modelos.

Simon Viegas · 24 de fevereiro de 2022

@VictorHC82, qual versão do VisualG está utilizando?

Funciona, sim! Veja:

Sobre:

23 minutos atrás, VictorHC82 disse:

[...] no caso de caractere se tiver apenas 1 caractere. Se você escrever palavras como "mocassim" e "rasteirinha", não funciona. Tente utilizar números para representar esses modelos.

Essa característica de funcionar com um só seria no Pascal (pai do VisualG). Pelo menos nas versões que conheço. No VisualG vai de boa.

Sugiro utilizar a verão 3.6.0.5.
Exemplo de fonte: https://sourceforge.net/projects/visualg30/files/
Baixe o VISUALG3_REV60.rar

Mauex7 · 3 de março de 2022

Em 22/01/2018 às 09:54, Simon Viegas disse:

Olá @Antonio Carlos Nenê Crepaldi. Seja bem vindo ao Fórum do Clube do Hardware.

Você apenas postou um código, sem quaisquer comentários... mas vamos lá:

Algoritmo "semnome"
var
   {cont:inteiro} //não está sendo utilizado
   {modelo, outro :caractere} //não está sendo utilizado
   modelo :caractere
inicio
escreva("entre com o modelo do calçado: ")
leia(modelo)
escolha modelo
   caso "mocassim"
      escreval("o modelo do calçado é masculino.")
   caso "rasteirinha"
      escreval("o modelo do calçado é feminino.")
   {SENAO} //sintaxe incorreta (apesar de não dá erro)
   OUTROCASO
      escreval("o calçado é infantil.")
fimescolha
fimalgoritmo

Resumidamente: no escolha/caso não tem senao.

No aguardo.

Não roda corretamente. Insiro o nome de uma das estações e vai direto para "outrocaso". Usando Visualg 3.0.7

Simon Viegas · 4 de março de 2022

@Mauex7, seja bem vindo ao Fórum do Clube do Hardware.

6 horas atrás, Mauex7 disse:

Não roda corretamente. Insiro o nome de uma das estações e vai direto para "outrocaso". Usando Visualg 3.0.7

Deve ser algum bug da versão que está utilizando. Veja uma fonte: https://www.apoioinformatica.inf.br/produtos/item/13-comando-de-selecao-multipla

A dica que dou é a mesma:

Em 24/02/2022 às 11:26, Simon Viegas disse:

Sugiro utilizar a verão 3.6.0.5.
Exemplo de fonte: https://sourceforge.net/projects/visualg30/files/
Baixe o VISUALG3_REV60.rar

Mauex7 · 5 de março de 2022

22 horas atrás, Simon Viegas disse:

@Mauex7, seja bem vindo ao Fórum do Clube do Hardware.

Deve ser algum bug da versão que está utilizando. Veja uma fonte: https://www.apoioinformatica.inf.br/produtos/item/13-comando-de-selecao-multipla

A dica que dou é a mesma:

Obrigado! Funcionou com a versão indicada....

Valeu!!!

JaaoPedro · 2 de junho de 2022

Nesse caso o seu Problema é a versão do VISUALG mas em como consertar utilizando o código da imagem abaixo

Simon Viegas · 2 de junho de 2022

Até onde lembro, o VisualG não diferencia minúsculo de maiúsculo, ou seja, não precisa desse maiusc().

E a dica geral continua:

Em 04/03/2022 às 00:23, Simon Viegas disse:

Em 24/02/2022 às 11:26, Simon Viegas disse:

Sugiro utilizar a verão 3.6.0.5.
Exemplo de fonte: https://sourceforge.net/projects/visualg30/files/
Baixe o VISUALG3_REV60.rar