VisualG Algoritmo de desconto

[Marigimenez]

Ajuda com uma questão, não aparece o valor com o desconto no meu programa, o que eu desenvolvi foi isso:

 

algoritmo "desconto"
var
   V : real
   N, G , masculino , feminino : caractere
inicio
   Escreva ("Digite seu nome : ")
   Leia (N)
   EscrevaL ("Digite seu gênero : ")
   Leia (G)
   EscrevaL ("Digite o valor das suas compras : ")
   Leia (V)
   Se (G = feminino) entao
      V <- V - (V * 0.05)
      EscrevaL ("O valor da sua compra com desconto sera de : " , V)
   senao
      Se (G = masculino) entao
         V <- V - (V * 0.13)
         EscrevaL ("O valor da sua compra com desconto sera de : " , V)
      FimSe
   FimSe
   // Seção de Comandos
fimalgoritmo

 

[Simon Viegas]

Olá, @Marigimenez.

 

23 horas atrás, Marigimenez disse:

var
   V : real
   N, G , masculino , feminino : caractere

Os masculino e feminino seriam valores, e não variáveis... Não se declara os valores (não dessa forma), pode usar diretamente onde precisa. Veja um exemplo abaixo:
 

algoritmo "Valor com desconto"
var
   valorCompras, valorComDesconto : real
   nome, genero : caractere

inicio
   escreva ("Digite seu nome : ")
   leia(nome)
   escreva ("Digite seu gênero (masculino ou feminino): ")
   leia(genero)
   escreva ("Digite o valor das suas compras : ")
   leia (valorCompras)
   se (genero = "feminino") entao
      valorComdesconto <- valorCompras - (valorCompras*0.05)
      escrevaL(nome, ", o valor das suas compra com desconto será de " , valorComDesconto:1:2)
   senao
      se (genero = "masculino") entao
         valorComdesconto <- valorCompras - (valorCompras * 0.13)
         escrevaL(nome, ", o valor da suas compras com desconto será de " , valorComDesconto:1:2)
      senao
         escrevaL("O gênero ", genero, "é inválido")
      fimSe
   fimSe
fimAlgoritmo

 

Utilizando escolha, poderia ser algo assim:
 

   escolha genero
   caso "feminino"
      valorComdesconto <- valorCompras - (valorCompras*0.05)
      escrevaL(nome, ", o valor das suas compra com desconto será de " , valorComDesconto:1:2)
   caso "masculino"
      valorComdesconto <- valorCompras - (valorCompras * 0.13)
      escrevaL(nome, ", o valor da suas compras com desconto será de " , valorComDesconto:1:2)
   outroCaso
      escrevaL("O gênero ", genero, "é inválido")
   fimEscolha

 

[Marigimenez]

@Simon Viegas Muito obrigada!