Vinicius Esperança

Eis que eu estou precisando de uma ajuda com esse Portugol. Já revirei de tudo que é jeito e sempre da erro depois de entrar os nomes e as idades e não aparece em ordem alfabetica var a,i,b,d,g,f,n :inteiro c :caracter nome :vetor [1..10] de caracter idade :vetor [1..10] de inteiro inicio para a de 1 ate 10 passo 1 faca Escreval("Entre com o nome de posição: ", a) Leia (nome[a]) fimpara para d de 1 ate 10 passo 1 faca Escreval("Insira a idade da posição: ",d) Leia (idade[d]) fimpara para a de 1 ate 9 passo 1 faca para b de a+1 ate 10 passo 1 faca se (nome[a] > nome[b]) entao c<-nome[c] nome[a]<-nome[b] nome[b]<-c fimse fimpara para d de 1 ate 9 passo 1 faca para g de a+1 ate 10 passo 1 faca se (idade[d] > idade[g]) entao f<-idade[f] idade[d]<-idade[g] idade[g]<-f fimse fimpara fimpara escreval("A lista de nomes e idades em ordem crescente é:") para i de 1 ate 10 passo 1 faca escreval (nome[c]) escreval (idade[f]) fimpara fimpara fimalgoritmo