Program Sorting

Program sorting adalah program yang digunakan untuk mengurutkan data.

Ada banyak cara mengurutkan data ini, di antaranya adalah:

1. Selection Sort
2. Bubble Sort
3. Insertion Sort
4. Merge Sort
5. Quick Sort

Tentang bagaimana proses/algoritma mengurutkan data itu bisa dipelajari di Wikipedia, tinggal klik pilihan anda di atas.

Yang akan saya berikan di sini adalah programnya yang sudah jadi, dengan menggunakan bahasa pemrograman Turbo Pascal for Window.

Programnya bisa anda download via link di bawah ini:
http://www.ziddu.com/download/3271427/sorting.doc.html

Program yang saya berikan itu hanya program sorting untuk mengurutkan data numerik (integer), sangat sederhana. Anda bisa memodifikasinya.

Sengaja saya sajikan programnya di Word. Untuk mencobanya, silakan dikopikan ke program Turbo Pascal for Window (TPW), jangan sampai terlewat satu karakter pun.

Selamat mencoba, mempelajari, dan memodifikasi.
SALAM SUKSES UNTUK ANDA!

***

Algoritma dan Program Pascal Untuk Menentukan Interval Data

Misalkan ada data. Jika kita diminta untuk menentukan intervalnya, maka yang harus kita lakukan adalah mencari data terkecil dan terbesarnya terlebih dahulu. Misalkan data terkecilnya ternyata adalah a dan data terbesarnya adalah b. Maka intervalnya adalah [a b].

Bagaimana algoritma untuk menentukan data terkecil dan terbesarnya?

Misalkan data-data yang dimasukkan adalah data[1], data[2], data[3],...., data[n].
Algoritma untuk menentukan data terkecil dan terbesar-nya adalah sebagai berikut:
Misal, K: data terkecil dan B: data terbesar
K dan B keduanya kita beri nilai awal data[1]
K = data[1], B = data[1]

1. langkah ke - 1: Bandingkan data[2] dengan K dan B
   Jika data[2] < K maka K = data[2]
   Jika data[2] > B maka B = data[2]
2. langkah ke-2: Bandingkan data[3] dengan K dan B
   Jika data[3] < K maka K = data[3]
   Jika data[3] > B maka B = data[3]
3. langkah ke-3: Bandingkan data[4] dengan K dan B
   Jika data[4] < K maka K = data[4]
   Jika data[4] > B maka B = data[4]
   .
   .
   .
   .
   langkah ke-i: Bandingkan data[i+1] dengan K dan B
   Jika data[i + 1] < K maka K = data[i + 1]
   Jika data[i + 1] > B maka B = data[i + 1]
   .
   .
   .
   .
   langkah ke-(n-1): Bandingkan data[n] dengan K dan B
   Jika data[n] < K maka K = data[n]
   Jika data[n] > B maka B = data[n]
   

Contoh konkretnya, jika kita mempunyai data: 5, 6, 3, 4, 7
Kita akan mencari data terkecil dan terbesarnya dengan algoritma di atas.
Berarti, pertama kita misalkan K = 5 dan B = 5. Proses setiap langkahnya:

1. 6 > 5 maka K = 5
   6 > 5 maka B = 6
2. 3 < 5 maka K = 3
   3 > 6 maka B = 6
3. 4 > 3 maka K = 3
   4 < b =" 6
4. 7 > 3 maka K = 3
   7 > 6 maka B = 7

Hasil akhirnya, data terkecilnya adalah K = 3, dan data terbesarnya adalah B = 7.
Maka intervalnya adalah [3 7]
Bagaimana? Mudah bukan?

Anda menginginkan contoh program pascalnya yang sederhana? Silakan download via link di bawah ini:
http://www.ziddu.com/download/3271455/IntervalData.doc.html

Programnya saya sajikan di Word. Silakan dikopikan ke Turbo Pascal for Window untuk mencoba ataupun memodifikasinya.

Selamat Belajar. Salam sukses untuk anda.

***