Ir para conteúdo

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

  • 0
EmersonReinecke

Visualg Função

Pergunta

Boa noite Amigos

 

Estou com dificuldade neste algoritimo,preciso que apos cadastrar itens ele tenha a opção de voltar para o menu principal.

 

var
codigo: vetor [1..5] de inteiro
valor: vetor [1..5] de real
descricao: vetor [1..5] de caracter
fim,iniciar,opcao2: caracter
opcao: inteiro
ordem: inteiro

inicio
ordem <- 1

escreval("OPCOES")
escreval("")
escreval("Escolha a Opcao que Deseja Executar:")
escreval("")
escreval("1. Cadastro de Novo Produto:")
escreval("2. Listagem de Produtos Cadastrados:")
escreval("3. Listar Produto e a Quantidade em Estoque:")
escreval("4. Gerar Cupom de Produtos Vendidos:")
escreval("5. Calcular o Valor total de Cupons:")
leia (opcao)
limpatela

escolha opcao

//cadastro dos produtos

caso 1
 opcao2 <- "i"
 enquanto opcao2 = "i" faca
      escreval("Cadastrando um novo Produto na Loja:")
      escreval("")
      escreval("Digite o Código do PRODUTO:")
      leia(codigo[ordem])
      escreval("Digite a Descricao do PRODUTO:")
      leia(descricao[ordem])
      escreval("Digite o Valor do PRODUTO:")
      leia(valor[ordem])
      escreval("Para cadastrar mais um produto Tecle 'I'. Para finalizar tecle 'F'")
      leia(opcao2)
   fimenquanto
   limpatela

   escreval("Produto cadastrado com sucesso!!")
   escreval("--------------------------------")
   escreval("Para cadastrar mais um produto Tecle 'I'. Para voltar ao menu tecle 'F'")
   leia(opcao2)
fimescolha
   escolha opcao2

   caso "f"
      escreval("Sistema Encerrado.")

   caso "i"
      enquanto opcao2 = "i" faca
         escreval("Cadastrando um novo Produto na Loja:")
         escreval("")
         escreval("Digite o Código do PRODUTO:")
         leia(codigo[ordem])
         escreval("Digite a Descricao do PRODUTO:")
         leia(descricao[ordem])
         escreval("Digite o Valor do PRODUTO:")
         leia(valor[ordem])
         escreval("Para cadastrar mais um produto Tecle 'I'. Para finalizar tecle 'F'")
         leia(opcao2)
      fimenquanto
      fimescolha
escolha opcao

//listagem dos produtos

caso 2

escreval("2. Listagem de Produtos Cadastrados:")
escreval("Digite o codigo do produto:")
leia(codigo[ordem])
escreval("O Produto Cadastrado é", [descricao], ".")

fimescolha
fimalgoritmo


 

Compartilhar este post


Link para o post
Compartilhar em outros sites

2 respostas a esta questão

Recommended Posts

Olá!. Não precisa criar outros "ESCOLHA" , só "CASO". Qualquer dúvida só perguntar. Vlw !!!! 
var
codigo: vetor [1..5] de inteiro
valor: vetor [1..5] de real
descricao: vetor [1..5] de caracter
fim,iniciar,opcao2: caracter
opcao: inteiro
ordem: inteiro
procedimento retornarMenu()
inicio
escreval("Para voltar ao menu Tecle 'I'. Para sair Tecle 'F.'")
leia(opcao2)
  se opcao2="i" entao
    limpatela
    menu()
  fimse
  se opcao2="f" entao
    limpatela
    escreval("Sistema Encerrado.")
    escreval("------------------")
  fimse
fimprocedimento
procedimento menu()
inicio
escreval("OPCOES")
escreval("")
escreval("Escolha a Opcao que Deseja Executar:")
escreval("")
escreval("1. Cadastro de Novo Produto:")
escreval("2. Listagem de Produtos Cadastrados:")
escreval("3. Listar Produto e a Quantidade em Estoque:")
escreval("4. Gerar Cupom de Produtos Vendidos:")
escreval("5. Calcular o Valor total de Cupons:")
leia (opcao)
limpatela
fimprocedimento
inicio
menu()
repita
escolha opcao
//cadastro dos produtos
caso 1
  opcao2 <- "i"
 
  enquanto opcao2="i" faca
    ordem <- ordem + 1
    escreval("Cadastrando um novo Produto na Loja:")
    escreval("")
    escreval("Digite o Código do PRODUTO: ")
    leia(codigo[ordem])
    escreval("Digite a Descrição do PRODUTO: ")
    leia(descricao[ordem])
    escreval("Digite o Valor do PRODUTO: ")
    leia(valor[ordem])
    limpatela
    escreval("Produto cadastrado com sucesso!!")
    escreval("--------------------------------")
    escreval("Para cadastrar mais um produto Tecle 'I'. Para finalizar tecle 'F'")
    leia(opcao2)
    limpatela
  fimenquanto
 
retornarMenu()
//listagem dos produtos
caso 2
    escreval("2. Listagem de Produtos Cadastrados:")
    escreval("Digite o codigo do produto:")
    leia(codigo[ordem])
    escreval("O Produto Cadastrado é", [descricao], ".")
retornarMenu()
fimescolha
ate opcao2="f"

Compartilhar este post


Link para o post
Compartilhar em outros sites

  • Conteúdo Similar

    • Por alexdyna
      Prezados,
      Amigos tenho que fazer um trabalho da faculdade onde o professor me da um arquivo que vou colocar anexo e tenho que fazer um algoritmo que leia o arquivo e monte uma tabela com as informações.
      pelo que vejo ele tem na primeira linha 8 barra e nas demais linha 10 barras
      ate a ultima que seria sua parada onde temos 2 barras seguidas.
       
      ficaria muito grato com a ajuda de todos.
       
      No arquivo anexo esta o texto:
      Nome/telefone/nascimento/Horas Curso/vendas T1/vendas T2/vendas T3/vendas T4/
       Luiz Ranza Neo/99934-5255/05/12/1989/200/107099,072578621/76915,8996218681/100922,271239691/76372,9971916498/
      Richard de Barrissaia/99326-4689/18/03/1990/150/55123,0080621828/68062,2200055909/67233,9928593779/45236,5928531083/
      Rodrigo Abalâminos/99911-7413/09/08/1987/168/71697,3866071191/58063,5644108225/88183,6230762134/48160,3116315664/
      José Gigfrid/99658-7874/15/04/1997/135/48816,199086596/50086,3689415844/52916,3066872779/55232,0663463164/
      Luiza Celly Silva/99659-1214/01/02/2000/90/29208,8223591438/39361,8088384592/45062,056112236/38913,7237126574/
      Maria Kunlun/99686-7845/21/04/1984/182/92076,1053757689/80440,5339844205/87575,0546657182/79220,9398178354/
      //
       
    • Por credson
      Elabore um algoritmo que possa descobrir, através de perguntas e respostas, qual meio de transporte o usuário está pensando.
      O usuário deverá escolher uma das seguintes opções:
      - Trator
      - Moto
      - Bicicleta
      - Trem
      - Carro
      - Caminhão
      - Ônibus
      - Paraquedas
      - Balão
      - Avião
      - Helicóptero
      - Submarino
      - Barco
      - Navio
      - Lancha
      Para chegar ao resultado, só devem ser usadas perguntas que retornem "Sim" ou "Não".
      Exemplo:
      É terrestre? Sim.
      Cabe apenas uma pessoa? Sim.
      É pesado? Não.
      Tem pedal? Sim.
       
       
       
      alguem sabveria pode ser  qualquer linguagem
    • Por andersonseifert
      boa tarde, podem me ajudar em uma logica ?
      tenho um numero exemplo 300 , quero aumentar ele sempre +1 , tipo usuario digitou que precisa de 50 numeros depois dos 300 exemplo : 301,302,303... ate 305.
       O que me recomendam fazer ? um array ou for somando +1 ?
       
       
       

    • Por Rafael da Silveira
      Bom dia Pessoal, tudo bem?
      O problema aqui está mais para matematica do que para programação. Mas como sei que aqui só tem fera e pode ser que alguem tenha passado por algo semelhante...

      Tenho um cliente que precisa de uma página, onde ele coloca o valor do produto a vista, e ele joga o valor com as taxas da maquinha de cartão dele...
      A principio é tranquilo, pega o valor, soma taxa, multiplica taxa e pronto...
       
      O problema é que essas taxas são cobradas em cima do valor final, o que depois dos descontos acaba saindo abaixo do valor a vista.
      E ele que receber o valor á vista, deixando para o cliente pagar essa diferença...

      Como resolver essa questão? Alguém poderia me ajudar?
       
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.