VisualG Informar se deu erro se 0 ou <100 e repetir operação se "S"

[Vktcs18]

Boa noite,

 

Não estou conseguindo repetir a operação caso o usuário deseje nem limitar a quantidade de códigos no VisualG. Segue...

 

procedimento cadastrarprodutos
var
   i,codigo:inteiro
   op:caracter
   s,n: logico
inicio
   s<-verdadeiro
   codigo<-1
   para i de 1 ate 100 faca
      escreval("Informe o código do produto:(Código de 1 a 100)")
      leia(celular[i].codigo)
      se((codigo=0) ou (codigo>100)) entao
         escreva("ERRO")
         escreval("Quantidade máx. de produtos cadastrados")
         escreval(" ")
      senao
         escreval("Informe o modelo do produto")
         leia(celular[i].modelo)
         escreval("Informe a marca do produto")
         leia(celular[i].marca)
         escreval("Informe o preço do produto")
         leia(celular[i].preco)
         escreval("====================================")
      fimse
      escreval("Deseja repetir a operação? Digite s para Sim ou n para Não ")
      leia( op )
      se op <> "s" entao
         s <- falso
      fimse

 

[JorgeGus]

Se você quer permitir que o usuário repita novamente as 100 leituras precisa colocar o seu código dentro de um Enquanto, se você quer confirmar se o usuário deseja continuar a cada uma das 100 leituras então troque o Para por um Enquanto usando um contador e também a variável op como condição.

 

Você não declarou o tipo celular nem declarou o vetor do tipo celular.

leia(celular[i].codigo)

 

Armazena um valor em uma variável de um elemento do vetor celular, já

se ((codigo=0) ou (codigo>100))

está se referindo apenas a uma variável chamada codigo e não a uma variável dentro de um elemento dentro de um vetor.

[devair1010]

@Vktcs18     se voce puder poste o codigo todo ,  pois para repetir voce precisa de um loop , que pede ser   o repita / ate   ,   e assim  tudo irah bem   . . .