Ir para conteúdo
Fórum Script Brasil
  • 0

Ajuda Visualg - "CASO"


mgoncalv

Pergunta

Galera,

mMeu problema é que as opções de casos não funcionam bem. Qualquer que seja o caso escolhido, o valor mostrado é sempre o discriminado para o primeiro caso. Alguém pode ajudar?

algoritmo "CRIANCAESPERANCA"
var
   D: Inteiro
   Valor: Real

inicio
      Escreval ("--------------------------")
      Escreval ("    CRIANCA ESPERANCA     ")
      Escreval ("--------------------------")
      Escreval ("   Obrigado por Ajudar!   ")
      Escreval ("--------------------------")
      Escreval ("         DIGITE:          ")
      Escreval ("   [1] Para doar R$ 10"    )
      Escreval ("   [2] Para doar R$ 25"    )
      Escreval ("   [3] Para doar R% 50"    )
      Escreval ("   [4] Para outros valores")
      Escreval ("   [5] Para cancelar"      )
      Escreval ("--------------------------")
      Escreva  ("   Escolha uma Opcao:"     )
      Leia (D)
      Escreval ("--------------------------")
      Escolha D
              Caso 1
                   Valor <- 10
              Caso 2
                   Valor <- 25
              Caso 3
                   Valor <- 50
              Caso 4
                   Escreval ("Qual o valor da doacao R$")
                   Leia (Valor)
              Caso 5
                   Valor <- 0
                   Escreval ("Mesmo assim muito obrigado")
      FimEscolha
      Escreval ("Sua doacao foi de R$ ",Valor, ".")
      Escreval ("    MUITO OBRIGADO!")
      Escreval ("--------------------------")
fimalgoritmo

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

  • 0
Em 08/11/2015 at 17:02, mgoncalv disse:

Galera,

mMeu problema é que as opções de casos não funcionam bem. Qualquer que seja o caso escolhido, o valor mostrado é sempre o discriminado para o primeiro caso. Alguém pode ajudar?

algoritmo "CRIANCAESPERANCA"
var
   D: Inteiro
   Valor: Real

inicio
      Escreval ("--------------------------")
      Escreval ("    CRIANCA ESPERANCA     ")
      Escreval ("--------------------------")
      Escreval ("   Obrigado por Ajudar!   ")
      Escreval ("--------------------------")
      Escreval ("         DIGITE:          ")
      Escreval ("   [1] Para doar R$ 10"    )
      Escreval ("   [2] Para doar R$ 25"    )
      Escreval ("   [3] Para doar R% 50"    )
      Escreval ("   [4] Para outros valores")
      Escreval ("   [5] Para cancelar"      )
      Escreval ("--------------------------")
      Escreva  ("   Escolha uma Opcao:"     )
      Leia (D)
      Escreval ("--------------------------")
      Escolha D
              Caso 1
                   Valor <- 10
              Caso 2
                   Valor <- 25
              Caso 3
                   Valor <- 50
              Caso 4
                   Escreval ("Qual o valor da doacao R$")
                   Leia (Valor)
              Caso 5
                   Valor <- 0
                   Escreval ("Mesmo assim muito obrigado")
      FimEscolha
      Escreval ("Sua doacao foi de R$ ",Valor, ".")
      Escreval ("    MUITO OBRIGADO!")
      Escreval ("--------------------------")
fimalgoritmo

Estou com o mesmo problema, você já conseguiu resolver esse código?

Link para o comentário
Compartilhar em outros sites

  • 0

Amigo mgoncalv, esse código roda sem problema na versão 2.5 do visual, mas na versão 3 mostra somente o primeiro valor, mesmo digitando quaisquer uma das opções. Neste caso o problema é resolvido mudando a variável "D" para caractere e as opções de Valor você coloca entre aspas. Funciona muito bem.

 Mudança na variável

De:

Var
	D: Inteiro

Para:

Var
	D: Caracter

Mudança nos "Caso"

De:

Escolha D
              Caso 1
                   Valor <- 10
              Caso 2
                   Valor <- 25
              Caso 3
                   Valor <- 50
              Caso 4
                   Escreval ("Qual o valor da doacao R$")
                   Leia (Valor)
              Caso 5
                   Valor <- 0
                   Escreval ("Mesmo assim muito obrigado")
FimEscolha

Para:

Escolha D
              Caso "1"     // Coloque o numero entre as ASPAS
                   Valor <- 10
              Caso "2"
                   Valor <- 25
              Caso "3"
                   Valor <- 50
              Caso "4"
                   Escreval ("Qual o valor da doacao R$")
                   Leia (Valor)
              Caso "5"
                   Valor <- 0
                   Escreval ("Mesmo assim muito obrigado")
FimEscolha

 Teste e veja se funciona...

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,7k
×
×
  • Criar Novo...