Exercício 5-5 Escreva algoritmo que leia caracteres em dois vetores vetA e vetB, de cinco posições.Após os dois vetores terem sido lidos, o algoritmo deverá colocar em um terceiro vetor vetC a diferença dos dois primeiro, i.e., os caracteres que estão contido em vetA e não estão contido em vetV. Por exemplo, se vetA = { “A”, “E”, “F”, “6“,“?”} e vetB = { “F”, “3”, “?”, “F“,“H”,“E”} então vetC = { “A”,“6“}

algoritmo "Interseção de Vetores A e B"

var

vetA,vetB:vetor[1..5] de literal

   vetC,vetCFinal:vetor[1..10] de literal

   contador,contadorC:inteiro

   qtdeEncontrada,posicaoEncontrada: inteiro

inicio

      contadorC<-1

      qtdeEncontrada<-1

     

   para contador de 1 ate 5 faca

        escreval("Informe um valor para A:")

        leia(vetA[contador])

        vetC[contadorC]<-vetA[contador]

        contadorC<- contadorC+1

        escreval("Informe um valor para B:")

        leia(vetB[contador])

        vetC[contadorC]<-vetB[contador]

        contadorC<- contadorC+1

   fimpara

  

   para contador de 1 ate 10 faca

        qtdeEncontrada<-0

        para contadorC de 1 ate 10 faca

             se (vetC[contador] <> vetC[contadorC]) entao

                qtdeEncontrada<- qtdeEncontrada+1

                se (qtdeEncontrada>1) entao

                   vetC[contadorC]<- ""

                fimse

             fimse

        fimpara

   fimpara

  

   contadorC<-1

   para contador de 1 ate 10 faca

        se (vetC[contador] <> "") entao

           vetCFinal[contadorC]<- vetC[contador]

           contadorC<-contadorC+1

        fimse

   fimpara

  

   para contador de 1 ate 10 faca

        se (vetCFinal[contador] <> "") entao

           escreval("Valor: ",vetCFinal[contador])

        fimse

   fimpara

fimalgoritmo