algoritmo "algoritmo composto"
// Função :
// Autor :  Gustavo Rodrigues Torre
// Data :
// Seção de Declarações
var
A,B : vetor[1..10] de inteiro
C : vetor[1..20] de inteiro
i: inteiro

inicio
// Seção de Comandos

para i de 1 ate 10 passo 1 faca
     escreva("Digite um valor do A", i,":")
     leia(A[i])
     C[i] <- A[i]
     escreva("Digite um valor do B", i,":")
     leia(B[i])
     C[i+10] <- A[i] + B[i]
fimpara
escreval
escreval("Vetor A       Vetor B ")

para i de 1 ate 10 passo 1 faca
    escreval("  ",A[i],"             ",B[i])
    fimpara

escreval
escreval("Vetor C    ")

para i de 1 ate 20 passo 1 faca
    escreval("  ",C[i])
    fimpara

fimalgoritmo