Question

Criar um algoritmo que imprima todos os números de 1 até 100 e a soma deles.

Answer 1

Algoritmo "Soma"

var
   indice : inteiro
   soma : inteiro

inicio

   soma <- 0

   para indice de 1 ate 100 faca
        soma <- soma + indice
  fimpara

Escreval("Soma = ",soma)

fimalgoritmo