Question

6- Criar um algoritmo em linguagem compatível com o software VisuAlg
que imprima todos os números de 1 até 100, inclusive, e a soma do
quadrado desses números.

Answer 1

var
i,soma:inteiro
y:vetor[1..100] de inteiro
inicio
para i de 1 ate 100 faca
  escreva (i)
  y[i]<- i*i
  soma<-soma +y[i]
fimpara
escreva (" a soma dos quadrados é",soma)
fimalgoritmo