Módulo 01 - Ordenamentos, o Direito e a Moral.

Voltando ao problema apresentado anteriormente, ao usarmos o conceito de vetor, o problema de somar 1000 números reais se simplifica e a solução é apresentada a seguir.

#incluir <biblioteca>
principal()
inicio
    inteiro i;
    real vetor[1000], soma;
    para(i←1; i<=1000; i←i+1)
    inicio
            escreva(“Digite o número”, i,”:”);
            leia(vetor[i]);
fim
soma = 0;
para(i←1; i<=1000; i←i+1)
            soma = soma + vetor[i];
escreva(“Soma = “, soma);
fim

Às vezes, a quantidade total de dados armazenados é conhecida, portanto, é necessário criar algoritmos que permitam a entrada de todos estes dados.