Como faço pra calcular a soma dos números pares entre 1 e 20?

Com base na Pergunda você deve ta iniciando então olha ae como ficaria em portugol.

var
soma,i : inteiro
inicio
soma<-0
para i de 1 ate 20 passo 1 faca
se (i mod 2 = 0 ) entao
soma <- soma+i
fimse
fimpara
escreva (soma)
fimalgoritmo

algoritmo "nº's pares de 1 a 20"

var

val, soma, i : inteiro

inicio

soma <- 0

para i de 1 ate 20 faca

 escreval("Informe um valor inteiro: ")

 leia(val)

fimpara

escreval("A soma dos números pares de 1 ate 20 (inclusive) é: ")

para i de 1 ate 20 faca

 se((val MOD 2)= 0) entao

 soma <- soma + val

fimse

fimpara

escreval(val)

fimalgoritmo