Soma de vetores - Portugol

algoritmo "Soma de vetores"
// Função :
// Autor : Moises fernandes barbosa moises33m@gmail.com
// Data : 11/11/2013
// Seção de Declarações

//2)Construir um algoritmo que leia 50 números para um vetor “A” e 50 para
//um vetor “B”.O algoritmo deverá efetuar a soma destes dois vetores em
//um vetor “C”.

var vetorA:vetor[1..50]de inteiro
vetorB:vetor[1..50]de inteiro
vetorC:vetor[1..50]de inteiro
i:inteiro
inicio
para i de 1 ate 50 faca
escreval("Entre com o numero ",i, "")
leia(vetorA[i])
fimpara
escreval
para i de 1 ate 50 faca
escreva("O numero",i, " é igual a: ")
leia(vetorB[i])
fimpara
escreval
para i de 1 ate 50 faca
escreval("A soma dos vetores é",i, "")
vetorC[i]<- vetorA[i] + vetorB[i]
escreval(vetorC[i])
fimpara
fimalgoritmo