Ir para conteúdo
Fórum Script Brasil
  • 0

Estrutura de repetição com vetores


Imguvoss

Pergunta

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

 

Link para o comentário
Compartilhar em outros sites

0 respostass a esta questão

Posts Recomendados

Até agora não há respostas para essa pergunta

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,2k
×
×
  • Criar Novo...