O Vetor não adiciona novas entradas

[Montesuma Oliveira 0]

Olá aos mestres do algoritmo com VisuAlg, tenho o seguinte algoritmo:

 

algoritmo "Estrutura Indexadas - Vetor(Array)"
// Seção de Declarações
var
indice, qtd_Veiculos, tot_Veiculos : inteiro
nome_veiculo: vetor [1..40] de caractere

inicio
// Seção de Comandos
escreval("Digite a Quantidade de Veículos para Cadastrar ou -1 Para Sair: ")
leia(qtd_Veiculos)
enquanto qtd_Veiculos <> -1 faca
   para indice de 1 ate qtd_Veiculos faca
      escreva("Digite o Nome do Veículo: ")
      leia(nome_veiculo[indice])
   fimpara
   tot_Veiculos <- 0
   tot_Veiculos <- (tot_Veiculos + (indice + 1))
   escreval("Digite a Quantidade de Veículos para Cadastrar ou -1 Para Sair: ")
   leia(qtd_Veiculos)
fimenquanto
para indice de 1 ate tot_Veiculos faca
   escreval("O Veículo ", nome_veiculo[indice], " tem o índice ", indice)
fimpara
fimalgoritmo

Estou usando vetor, o que acontece é o seguinte, por exemplo, digite dois veículos, quando ele retorna perguntando se quero encerrar, eu digo que quero incluir mais dois veículos, ao digitar -1 para sair, ele imprime somente os dois últimos veículos cadastrados e não 4 veículos, que deveria ser o correto, conforme figura anexa. Onde estou errando? Fico no aguardo de ajuda, muito grato.

 

 

 

 

 

 

 

 

 

 

 

[Felipe Guedes Coutinho 0]

Montesuma Oliveira

Existe um erro na sua lógica.

Quando você faz o laço para colocar o nome do carro você sempre começa do INDICE 1 até a quantidade.

para indice de 1 ate qtd_Veiculos faca
      escreva("Digite o Nome do Veículo: ")
      leia(nome_veiculo[indice]) <-- aqui você sempre começa de 1 até quantidade. (Errado)
   fimpara

Então eu digito 2 e escrevo na posição 1 o nome A e na posição 2 o nome B.

Quando você digita 2 novamente para adicionar outros nomes você faz novamente a mesma coisa.

Escreve na posição 1 o nome C e na posição 2 o nome C

 

Para arrumar isso eu recomendo você a mudar o leia(nome_veiculo[indice]) alterando o indice para uma outra variável e incrementando ela dentro do seu laço.

 

Assim:

// Seção de Declarações
var
indice, qtd_Veiculos, tot_Veiculos, POSICAO : inteiro
nome_veiculo: vetor [1..40] de caractere

inicio
// Seção de Comandos
escreval("Digite a Quantidade de Veículos para Cadastrar ou -1 Para Sair: ")
leia(qtd_Veiculos)
enquanto qtd_Veiculos <> -1 faca
   para indice de 1 ate qtd_Veiculos faca
      posicao = posicao + 1
      escreva("Digite o Nome do Veículo: ")
      leia(nome_veiculo[POSICAO])
   fimpara
   tot_Veiculos <- POSICAO
   escreval("Digite a Quantidade de Veículos para Cadastrar ou -1 Para Sair: ")
   leia(qtd_Veiculos)
fimenquanto
para indice de 1 ate tot_Veiculos faca
   escreval("O Veículo ", nome_veiculo[indice], " tem o índice ", indice)
fimpara
fimalgoritmo

Então neste caso a lógica fica:

Digito 2 e escrevo na posição 1 o nome A e na posição 2 o nome B.

Quando digitar +2 para adicionar outros nomes, eu não vou iniciar o Vetor novamente do Indice 1, tenho que iniciar da posição 3.

Mudando o indice para posicao e adicionando sempre +1 antes de mover o valor vamos colocar na posição 3 o nome C e na posição 4 o nome D.

 

Se a minha resposta for útil não esqueça de agradecer e votar positivo.

Espero ter ajudado de alguma forma.

 

Att
Felipe Guedes Coutinho