Imguvoss

Olá pessoal, Eu preciso fazer um algoritmo no VisualG que leia um determinado número de notas e as organize-as de forma crescente, eu consegui elaborar o algoritmo, mais, no resultado ele aparece um 0, sendo que eu não digitei nenhum 0. Exemplo: Digitei: 9 10 2 No resultado aparece: 0 2 9 10 O algoritmo está abaixo, obrigado. Algoritmo "Obter notas e apresentar em ordem crescente" Var aNotas: VETOR[1..50] DE INTEIRO I, J, Y, L, K, nNumero: INTEIRO Inicio Escreva("Digite o número de notas que você deseja ordenar: ") Leia(nNumero) Para I De 1 Ate nNumero Passo 1 Faca Escreva("Digite a", I,"° nota: ") Leia(aNotas[I]) Fimpara Para K De 1 Ate I-1 Faca Para J De 1 Ate nNumero Faca Se aNotas[J] > aNotas[J+1] Entao Y <- aNotas[J] aNotas[J] <- aNotas[J+1] aNotas[J+1] <- Y Fimse Fimpara Fimpara Para L De 1 Ate J Faca Escreval(aNotas[L]) Fimpara Fimalgoritmo