Como somar valores dentro de um vetor?

[VioletFox]

Olá galera, eu estou fazendo um algoritmo em que o usuário insira 10 números, e o programa tem que dizer quais números são mútiplos de 3 e somar esses números.

algoritmo "Multiplos de 3"
// Função : Achar multiplos de 3 e somá-los.
// Autor : VioletFox ~
// Data : 16/08/2012
// Seção de Declarações
var
v,x: vetor[1..10] de inteiro
i,s: inteiro
inicio
// Seção de Comandos
para i de 1 ate 10 faca
     escreva ("Escreva um número: ")
     leia (v[i])
fimpara
escreva ("Os números multiplos de 3 são: ")
para i de 1 ate 10 faca
     se ((v[i] mod 3)=0) então
        x[i+1] <- v[i]
        escreva (x[i+1])
     fimse
fimpara
[COLOR="Red"]s <- x[1]+x[2]+x[3]+x[4]+x[5]+x[6]+x[7]+x[8]+x[9]+x[10][/COLOR]
Escreval (" ")
Escreva ("A soma dos multiplos de 3 é:",s)
fimalgoritmo

Na parte que está em vermelho é a parte em que o programa soma os múltiplos de 3. O problema é: e se eu precisar, a invés de 10, inserir 100 números? Eu teria que digitar x[1]+x[2]+... até 100? Não teria uma forma mais fácil de somar esses valores dentro do vetor?

Agradeço desde já.

[Simon Viegas]

Olá galera, eu estou fazendo um algoritmo em que o usuário insira 10 números, e o programa tem que dizer quais números são mútiplos de 3 e somar esses números.

Código:

// Função : Achar multiplos de 3 e somá-los.
// Autor : VioletFox ~
// Data : 16/08/2012
// Seção de Declarações
var
v,x: vetor[1..10] de inteiro
i,s: inteiro
inicio
// Seção de Comandos
para i de 1 ate 10 faca
escreva ("Escreva um número: ")
leia (v[i])
fimpara
escreva ("Os números multiplos de 3 são: ")
para i de 1 ate 10 faca
se ((v[i] mod 3)=0) então
x[i+1] <- v[i]
escreva (x[i+1])
fimse
fimpara
[COLOR="Red"]s <- x[1]+x[2]+x[3]+x[4]+x[5]+x[6]+x[7]+x[8]+x[9]+x[10][/COLOR]
Escreval (" ")
Escreva ("A soma dos multiplos de 3 é:",s)
fimalgoritmo

algoritmo "Multiplos de 3"

Na parte que está em vermelho é a parte em que o programa soma os múltiplos de 3. O problema é: e se eu precisar, a invés de 10, inserir 100 números? Eu teria que digitar x[1]+x[2]+... até 100? Não teria uma forma mais fácil de somar esses valores dentro do vetor?

Agradeço desde já.

Olá VioletFox,

Como você está somando os valores de x, e é um vetor, você também pode usar um para.

No aguardo

Abraços