Escreva um 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 o resultado da união dos dois primeiros, i.e., os caracteres que estão contidos em um ou outro vetor. Assuma que em um mesmo vetor não haverá caracteres repetidos, mas uma caracter contido em vetA poderá também estar contido em vetB. Nesse caso, apenas uma ocorrência é colocada em vetC. Por exemplo, se
vetA = { “A”, “E”, “F”, “6“,“?”}
e
vetB = { “F”, “3”, “?”, “F“,“H”,“E”}
então
vetC = { “A”, “E”, “F”, “6“,“?”,”3”,“H”}
Algoritmo "exercicio4"
Var
vetA, vetB: vetor [1..5] de literal
vetC: vetor [1..10] de literal
i, j, k: inteiro
repet: logico
Inicio
Escreval("Informe os valores do vetor A")
Para i de 1 ate 5 faca
Escreva("informe o ",i, "o valor: ")
Leia(vetA[i])
Fimpara
Limpatela
Escreval("Agora, Informe os valores do vetor B")
Para i de 1 ate 5 faca
Escreva("informe o ",i, "o valor: ")
Leia(vetB[i])
Fimpara
Limpatela
k<-1
Para i de 1 ate 5 faca
repet <- FALSO
Para j de 1 ate 5 faca
Se (vetA[i]=vetA[j]) entao
Se(i > j) entao
repet <- VERDADEIRO
Fimse
Fimse
Se (vetA[i]=vetB[j]) entao
repet <- VERDADEIRO
Fimse
Fimpara
Se (repet=FALSO) entao
vetC[k] <- vetA[i]
k <- k + 1
Fimse
Fimpara
Para i de 1 ate 5 faca
repet <- FALSO
Para j de 1 ate 5 faca
Se (vetB[i]=vetA[j]) entao
repet <- VERDADEIRO
Fimse
Se (vetB[i]=vetB[j]) entao
Se(i > j) entao
repet <- VERDADEIRO
Fimse
Fimse
Fimpara
Se (repet=FALSO) entao
vetC[k] <- vetB[i]
k <- k + 1
Fimse
Fimpara
Fimalgoritmo
Nenhum comentário:
Postar um comentário