Resposta :
Primeiro algoritmo (para copiar):
Algoritmo "primeiro-algoritmo"
Var
value: inteiro
Inicio
value <- 0
para value de 0 ate 99 faca
value <- value + 1
escreval(value) // Escrevendo na Tela todos os números de 1 até 100
fimpara // Eu utilizei "escreval", mas se você achar desnecessário pode utilizar "escreva"
Fimalgoritmo
Segundo algoritmo (para copiar):
Algoritmo "segundo-algoritmo"
Var
value, current: inteiro
Inicio
value <- 0
current <- 0
para value de 0 ate 99 faca // Criando um loop para somar os valores a cada número percorrido
value <- value + 1
current <- current + value
fimpara
escreval(current) // Resultado da soma dos números
Fimalgoritmo
Perdão pela demora, abraços.