Exercicio visualg

Programação
#1

Comecei agora e estou em duvida em relação aos vetores alguém poderia me ajudar com este exercício:
Elabore um algoritmo que leia 10 número inteiros e armazene os números pares em um vetor e os números ímpares em outro vetor. Ou seja, você precisará de dois vetores com 10 posições cada um, de forma que no momento que o usuário for informando os dados, os números sejam armazenados no vetor correto.
Tá lendo só os pares e na quantia errada ainda

Var
opcao : inteiro

i, val: inteiro
par, imp: vetor[1…10] de inteiro

Inicio
para i <- 1 ate 10 faca
escreval("Digite o ", i,"° valor: ")
leia(val)
se (val % 2 = 0) entao
par[i]<- val
senao
imp[i]<- val
fimse
fimpara
escreval("O total de pares é: ", par[i])
escreval("O total de impares é: ", imp[i])

Fimalgoritmo

#2

Só com o enunciado fica difícil alguém se animar a te ajudar. Mostre o que tentou.

Recomendo a leitura: Como fazer uma boa pergunta?

Abraço.

#3

blz, vou reformular minha pergunta, obrigado pela dica

#4

Não lembro a sintaxe de portugol.Supondo que você tenha escrito tudo correto, troque o que marquei por isso abaixo, que deve resolver seu problema:

escreval("Os números pares são: ")

para i <- 1 ate 10 faca
    escreval(par[i] , " ")
    fimpara
    
escreval("E os números ímpares são: ")

para j <- 1 ate 10 faca
    escreval(impar[j] , " ")
    fimpara

fimalgoritimo

========

Você tinha colocado pra mostrar o vetor, mas sem correr cada posição dele.