|
The Bubble Trier est l'un des premiers algorithmes de tri tirés par un étudiant en science informatique, car il est l'un des plus simples à mettre en œuvre et plus intuitive. La procédure de base est simple: à partir du début du tableau, le programme passe à travers le réseau à la recherche d' un élément de tableau qui est plus grand que celui à sa droite , et les swaps eux. Il recommence alors et répète le même processus sur le nouveau tableau. Il fait cela jusqu'à ce qu'il puisse passer par l'ensemble du réseau sans éléments permutation. En pratique, cela donne l'impression que si les grands éléments du tableau sont des bulles qui flottent à la surface du tableau. Instructions
1 Ouvrez Visual Basic et cliquez sur "Fichier " et "Nouveau projet " pour créer un nouveau projet . Sélectionnez " ConsoleApplication . " Quand vient le temps d'entrer votre code dans un projet réel avec une interface utilisateur graphique (GUI) , vous pouvez simplement copier cette fonction là sans modification.
2 Collez le code suivant au-dessus de la "Main" fonction :
Sous BubbleSort ( ByRef arr () As Integer)
Dim température
interrupteur Dim = True
alors que le commutateur
basculer = False
Pour x = 0 To arr.Length - 2
Si arr (x)> arr ( x +1) Puis
temp = arr ( x )
arr (x) = arr ( x +1)
arr ( x +1) = Temp Changer de = True
End If
Suivant
End While
End Sub
Une chose importante à reconnaître est que l' arr est passé dans le sous-programme " ByRef . " Ceci permet à la fonction de modifier le contenu du tableau
3 Collez le texte suivant dans la fonction "Main" pour tester la méthode BubbleSort : .
Sub Main ( ) Photos Dim arr = { 3, 4, 5232 , 1 , 232, 12, 34 , 14, 21 , 213, 213 , 21, 321 }
Console.WriteLine (" trier" ) Photos For Each x In arr
Console.Write ( x & " Chaque x Dans arr
Console.Write ( x & "" )
Suivant
Console.ReadKey ()
End Sub
End Module
Cela génère un tableau simple , non triés des entiers et raconte BubbleSort de les trier , puis imprime les résultats.
|
