8) Fazer um programa para calcular a soma dos N primeiros números, onde N é lido.

algoritmo "Calcula a soma do número e seus antecessores"

var
  n,i,soma: inteiro

inicio
  escreva("Digite um número ")
  leia(n)
    para i de n ate 1 passo -1 faca
      soma<-i+soma
    fimpara
      escreval("A soma dos seus antecessores é:", soma)
fimalgoritmo