Return to the menu

1

I'm doing a college job and I'm having a hard time putting my ideas into practice.

The job consists of a "car rental manager".

My code so far is as follows:

  Algoritmo "semnome"

Var

   Cliente, endereco: vetor[1..5] de caractere
   RG, CPF, nas, CNH: vetor[1..5] de inteiro
   codigo, i: inteiro

procedimento cliente
inicio
   para i <- 1 ate 5 faca
      Escreval("Nome do cliente")
      Leia (Cliente[i])
      Escreval("RG")
      leia(RG[i])
      Escreval("CPF (Apenas numeros)")
      leia(cpf[i])
      Escreval("Endereço")
      Leia(endereco[i])
      Escreval("Data de nascimento")
      Leia(nas[i])
      Escreval("Numero da carteira de habilitaçao")
      leia(CNH[i])
      Escreval("o usuario ",(Cliente[i]), " foi cadastrado com sucesso!")
      Escreval("Gostaria de cadastrar outro cliente ?[S/N] ")
   fimpara
fimprocedimento

Inicio
   escreval("          Selecione uma opcao para continuar"          )
   escreval("-------------------------------------------------------")
   escreval("1 - Cadastro de cliente")
   Escreval("2 - Cadastro de automovel")
   escreval("3 - Classificacao de automoveis")
   escreval("4 - Movimentacao de locaçao")
   Escreval("5 - Sair")
   escreval("-------------------------------------------------------")
   leia (codigo)

   Escolha (codigo)
   caso 1
      cliente
Fimalgoritmo

However, in the client procedure. I would like to give the option of for whenever you want, not necessarily be 5 compulsory registrations.

And after the registration return to the menu to select another option.

    
asked by anonymous 18.10.2017 / 00:42

1 answer

1

First of all the syntax in the end is missing a fimescolha . Try to see the example below and add to the code repeat so you can go back to the menu to select another option.

    Inicio
    escreval("          Selecione uma opcao para continuar"          )
    escreval("-------------------------------------------------------")
    escreval("1 - Cadastro de cliente")
    escreval("2 - Cadastro de automovel")
    escreval("3 - Classificacao de automoveis")
    escreval("4 - Movimentacao de locaçao")
    escreval("5 - Sair")
    escreval("-------------------------------------------------------")
    repita
    leia (codigo)
    escolha (codigo)
    caso 1
    cliente
    ate(codigo=5)
    fimescolha
    fimalgoritmo
    
20.10.2017 / 16:08