Pengurutan Data(Sorting) Menggunakan Bubble Sort

Sekarang ini dapat dimudahkan oleh teknologi internet yang sudah sangat berkembang pesat, jadi meskipun belajar dirumah dapat dimudahkan oleh jaringan internet. Nah kali ini saya akan membahas bagaimana mengurutkan sebuah data dari terkecil hingga terbesar (Ascending), dalam pengurutan banyak sekali macam-macam metode yang dapat kita praktekkan , disini saya  menggunakan metode Bubble Sort, cara ini tergolong mudah karna script nya juga gampang banget tapi kembali lagi kalau kita mempelajari sebuah pemrograman atau bahasa pemrograman kita harus bermain dengan logika kita karena itu sangat penting sekali kalau logika kita tidak bermain alhasil kita akan sangat sulit untuk memahami sebuah program yang ingin kita buat. Nah sekarang mari kita coba :

saya akan menyusun jumlah buku di rak dari yang terkecil hingga terbesar.

 - pertama :

                masukkan sebuah variable, nama variable terserah kalian mau nama apa disini saya pakai Rak, Bil_1 dan Bil_2. Berhubung saya membuat 5 buah rak jadi indeks nya ada 4 karna perhitungan indeks dimulai dari angka 0 bukan 1.

 - kedua :

            membuat sebuah perulangan untuk mengisi jumlah data yang diinputkan oleh user, sebetulnya bisa saja kita langsung memasukkan 5 data itu di dalam script, akan tetapi lebih mudahnya kalau yang menginputkan user sendiri supaya tidak menulis terlalu banyak di dalam script tersebut.

 

 - Ketiga :

           Perulangan yang ke 2 untuk mengurutkan angka-angka yang sudah dimasukkan oleh user, ingat disisini sangat penting untuk memberi nilai awal pada sebuah perulangan , jadi sebelum ada perulangan harus dikasih nilai awal seperti contoh dibawah bil_1=0.

              Dalam proses pengurutan perlu adanya variabel pembantu yang fungsinya untuk menyimpan nilai terakhir supaya tidak hilang, saya menamainya sebagai variabel cadangan karna variabel ini hanya bersifat sementara saja.

 

               NB: Berhubung saya memulai dari kecil ke besar saya menggunakan kurang dari (<),                kalau dari besar ke kecil {descending} menggunakan (>).

 - Keempat :

          Nah yang terakhir ini kita membuat perulangan yang terakhir untuk  menampilkan semua angka yang sudah diurutkan. Ingat jika membuat perulangan baru wajib memberikan nilai awal supaya tidak adanya kekacauan pada system.

                 Berikut ini script lengkanya :

        Dim Rak(4) As Integer
        Dim bil_1, bil_2 As Integer

        Console.WriteLine("Nama: Eliza Oktafiani")
        Console.WriteLine("NIM: 119229045")
        Console.ReadLine()
        Console.WriteLine("=================STMIK YADIKA BANGIL===============")
        Console.WriteLine("menyusun jumlah buku menggunakan Bubble Sort :")
        Console.ReadLine()

        bil_1 = 0
        While bil_1 < 5
            Console.WriteLine("masukkan jumlah buku di rak no {0}", bil_1)
            Rak(bil_1) = Console.ReadLine()

            bil_1 = bil_1 + 1
        End While
        Console.ReadLine()
        Console.WriteLine("---------------------------------------------------------")
        Console.WriteLine("susunan jumlah buku seperti dibawah ini :")

        bil_1 = 0

        While bil_1 <= 3
            bil_2 = 0
            While bil_2 <= 3 - bil_1
                If Rak(bil_2) > Rak(bil_2 + 1) Then
                    Dim cadangan As Integer
                    cadangan = Rak(bil_2)
                    Rak(bil_2) = Rak(bil_2 + 1)
                    Rak(bil_2 + 1) = cadangan
                End If
                bil_2 = bil_2 + 1
            End While
            bil_1 = bil_1 + 1
        End While

        bil_1 = 0

        While bil_1 < 5
            Console.WriteLine(Rak(bil_1))
            bil_1 = bil_1 + 1
        End While

          NB : ㅁ  : Ini untuk menambahkan kata-kata yang kalian inginkan bisa diganti dengan                                apapun, disini saya menambahkan kata universitas saya dan nama saya.
                   ㅁ  : ini untuk memberi nilai awal pada perulangan baru.

Hasil pada console seperti ini :

          Nah sampai disini saja penjelasan dari saya adapun kurangnya saya minta maaf dan terimakasih atas perhatiannya , Wassalamu'alaikum Warahmatullahi Wabarakaatuh. Stay Healthy semuanya dan tetap #DirumahAja....

=========================STMIK YADIKA BANGIL===========================