Home
Drop Menu
Sub Menu 1.1
Sub Menu 1.2
Sub Menu 2.1
Sub Menu 2.2
Sub Menu 2.3
Sub Menu 1.3
Sub Menu 3.1
Sub Menu 3.2
Sub Menu 3.3
Archive Page
Blog Page
My Kampuzzzz
Beranda
Topics :
Choose Categories
Organisasi Komputer (13)
PTI (13)
Pemrograman Objek (PBO) (10)
kecerdasan buatan (10)
Sistem Berkas (9)
Struktur Data (8)
Bahasa Pemrograman (7)
Perangkat Lunak Jaringan 1 (7)
visual basic (4)
SQL (1)
skip to main
|
skip to sidebar
Home
Struktur Data
Sorting dengan Metode SHELL
Sorting dengan Metode SHELL
uses crt;
type larik= array[0..1000] of integer;
var data:larik;
n,i:integer;
procedure tukar(var a,b:integer);
var t: integer;
begin
t:=a;
a:=b;
b:=t;
end;
procedure shell(var a:larik;n:integer);
var i,j,jarak:integer;
begin
jarak := n div 2;
while jarak > 0 do
begin
for i:=1 to n - jarak do
begin
j:=i+jarak;
if a[i] > a[j] then
tukar (a[i],a[j]);
end;
jarak :=jarak div 2;
end;
end;
procedure baca;
begin
for i:=1 to n do
write (data[i],' ');
end;
begin
clrscr;
randomize;
write ('jumlah data :');readln(n);
for i:=1 to n do
data[i]:=random(n);
baca;
writeln;
shell(data,n);
baca;
readln;
end.
Share this article
:
0 comments:
Speak up your mind
Tell us what you're thinking... !
Newer Post
Older Post
Home
Popular post
Heuristic Search (kecerdasan buatan)
Teknik Generate dan Test Generate dan Test adalah cara yang paling sederhana dalam proses pencarian. Algoritma generate dan test ...
MASALAH, RUANG KEADAAN dan PENCARIAN (kecerdasan buatan)
Inference Engine Secara umum, untuk mendeskripsikan masalah dengan baik, hendaknya: Mendefenisikan suatu ruang keadaan ...
TEKNIK PENCARIAN (kecerdasan buatan)
Secara garis besar, Pencarian dibedakan menjadi : Uninformed search (blind search). Tidak ada informasi mengenai jarak/cost dari curre...
METODE PENGURUTAN DATA
Pengurutan (sorting) adalah proses mengatur sekumpulan objek menurut urutan atau susunan tertentu. Urutan objek tersebut dapat menaik (ascen...
Sejarah Kecedasan Buatan
Teori-teori yang mengarah ke KB sudah muncul sejak tahun 1941. Berikut ini tahap-tahap sejarah perkembangan KB : A. Era Komputer Elektronik...
Pemrosesan String di Linux
Beberapa perintah Linux dapat digunakan untuk melakukan pemrosesan file teks seperti manipulasi file, pengurutan dan pencarian fi...
Struktur File dan Direktori di Linux
Linux tidak mengenal istilah drive seperti pada DOS atau Windows. Pada sistem operasi DOS/Windows ada istilah drive A:, drive B:, drive C: ,...
Apliaksi sistem fuzzy
sistem pakar (kecerdasan Buatan)
Logika Fuzzy (kecerdasan buatan)
Blog Archive
►
2010
(
10
)
►
November
(
2
)
►
February
(
8
)
▼
2009
(
76
)
►
October
(
1
)
►
April
(
5
)
►
March
(
43
)
►
February
(
1
)
▼
January
(
26
)
INSTIRAHAT DULUUU
Program menggabungkan teks pada bahasa C
Membuat file pada bahasa C
Program daftar pemesana barang menggunakan STRUCTU...
Program daftar pemesanan barang menggunakan STRUCT...
contoh program class bag 3 (bahasa C)
contoh program class bag 2 (bahasa C)
contoh program class (bahasa C)
Contoh Program Selection (bahasa C)
Contoh Program Short (bahasa C)
Buble shorting ( menggunakan bahasa C)
EDITOR LINUX ( Vi )
Pemrosesan String di Linux
Struktur File dan Direktori di Linux
macam2 Text Editor Pada Linux
>>>> Shell Script I <<<<
PROGRAM ANTRIAN BAGIAN 2
PROGRAM ANTRIAN
Program antrian dengan metode Tumpukan
sorting dengan metode Merge Short
sorting dengan MEtode SELEKSI
Sorting dengan Metode SHELL
PENGENALAN LINUX
DISTRO LINUX
CONTOH PROGRAM POINTER (PASCAL)
METODE PENGURUTAN DATA
►
2008
(
2
)
►
November
(
1
)
►
October
(
1
)
Support :
Creating Website
|
Johny Template
|
Mas Template
Copyright © 2011.
My Kampuzzzz
- All Rights Reserved
Template Created by
Creating Website
Inspired by
Sportapolis Shape5.com
Proudly powered by
Blogger
0 comments:
Speak up your mind
Tell us what you're thinking... !