bubble - shell | ASD

bubble sort
1. index <- 0
2. pos_akhir <- n-2
3. selama index <= pos_akhir kerjakan baris 4 dan 5
4. jika A[index] > A[index+1] maka swap(A[index], A[index+1])
5. index <- index + 1

shell sort
1. Jarak <- N
2. selama Jarak > 1 kerjakan baris 3 sampai dengan 12
3. Jarak <- Jarak / 2
4. did_swap <- true
5. kerjakan baris 6 sampai dengan 12 selama did_swap = true
6. did_swap  <- false
7. i <- 0
8. selama i < (N-Jarak) kerjakan baris 9 sampai dengan 12
9. jika Data[i] > Data[i + Jarak] kerjakan baris 10 dan 11
10. tukar(Data[i], Data[i+Jarak])
11. did_swap <- true
12. i <- i + 1

/** yufieko **/