Algoritmo "exercício 2 dia 23 de abril 2020"

Algoritmo "exercício 2 dia 23 de abril 2020"
Var
   // Seção de Declarações das variáveis
   i,t,n,j,k: inteiro
   v:vetor[1..6] de inteiro
Inicio
   // pedir números
   para i de 1 ate 6 faca
      t<-0 // reset ao t
      escreva("Escreva o", i,"º número: ")
      leia(n)
      // comparar
      j<-0
      repita
         j <- j+1
         se v[j]= n entao
            // encontrou
            t<-1
         fimse
      ate (j=i) ou (t=1)
      se t=0 entao
         k<-k +1 // comprimento do vetor solução
         v[k]<-n
      fimse
   fimpara

   para i de 1 ate k faca
      escreva(v[i])
   fimpara
Fimalgoritmo