How do I read to read these numbers and sum all without having to add variable by variable type sum it 60 times

Beatriz, good evening

I checked your code and realized that some operations do not need to be done and the sum of the note is not correct.

Tip: Use the indentation, as well as making it easier to read, it will make it easier to understand who you read the code for.

algoritmo "questionario"

var
   Resposta: Caractere
   soma, Nota: Inteiro

inicio
   //Importante inicializar com valor 0, caso contrário irá inicializar com valor aleatório
   nota <- 0

   Escreval("Questionario ENEM 2018")
   Escreval("1) Qual a capital do Brasil?")
   Escreval("----------------------------")
   Escreval("a) Brasilia")
   Escreval("b) Acre")
   Escreval("c) São Paulo")
   Escreval("d) Amazônia")
   Escreva("Digite a resposta correta: ")
   Leia (Resposta)

   Se (Resposta = "a") entao
      Escreval("Resposta Correta")
      Escreval("===================")
      Nota <- Nota + 10
   Senao
      //Caso a resposta seja falsa não é preciso incrementar, pois o valor continua 0
      Escreval("Resposta Incorreta")
      Escreval("===================")
   Fimse

   //Questão 2//
   Escreval("2) Qual a cidade maravilhosa?")
   Escreval("----------------------------")
   Escreval("a) Brasilia")
   Escreval("b) Acre")
   Escreval("c) São Paulo")
   Escreval("d) Rio De Janeiro")
   Escreva("Digite a resposta correta: ")
   Leia (Resposta)

   Se (Resposta = "d") entao
      Escreval("Resposta Correta")
      Escreval("===================")
      Nota<- Nota + 10
   Senao
      Escreval("Resposta Incorreta")
      Escreval("===================")
   Fimse

   //Questão 3//
   Escreval("3) Qual a cidade maravilhosa?")
   Escreval("----------------------------")
   Escreval("a) Brasilia")
   Escreval("b) Acre")
   Escreval("c) São Paulo")
   Escreval("d) Rio De Janeiro")
   Escreval("Digite a resposta correta")
   Leia (Resposta)

   Se (Resposta = "d") entao
      Escreval("Resposta Correta")
      Escreval("===================")
      Nota <- Nota + 10
   Senao
      Escreval("Resposta Incorreta")
      Escreval("===================")
   Fimse

   Escreval("Seu total de pontos foi de ", Nota)

Fimalgoritmo

To add more numbers instead of variable by variable, use the repeat structure FOR FACING FACTS

Take a look at an example below:

algoritmo "Somar60vezes"
var
   soma, valor, contador, resultado: Inteiro

inicio

   Para contador <- 1 ate 60 faca
      Escreva("Informe o ", contador, "º valor para somar: ")
      Leia(valor)
      soma <- soma + valor
   FimPara

   resultado <- soma

   Escreva("A soma do valor é ", resultado)

fimalgoritmo

In order not to enter 60 times, the visualg provides a tool that generates random values, see in the field highlighted in red, since the field in yellow you can choose the interval to generate the random values, in this case I will generate any number that is between 0 and 20