Exercício 1 Vetores..resolvidos

Crie um algoritmo que leia um vetor de 10 números inteiros. Em seguida, calcule e escreva o somatório dos valores deste vetor.
Algoritmo "ex1 vetores"
// Disciplina   : ALGORITMOS
// Professor    : ANGELO DA CUNHA SÁ
// Descrição   : Aqui você descreve o que o programa faz! (função)
// Autor(a)    : Nome do(a) aluno(a)
// Data atual  : 21/10/2016
Var
   // Seção de Declarações das variáveis
   v: vetor[1..10] de inteiro
   i,n,soma:inteiro
Inicio
   // Seção de Comandos, procedimento, funções, operadores, etc...
   para i:=1 ate 10 faca
      escreval("Digite o ",i," valor desejado")
      leia(n)
      soma<-soma+n
   fimpara
   escreval(" A soma dos valores é: ",soma)

Fimalgoritmo