Blog cepat terkenal dan banyak dikunjungi oleh googling mania, adalah impian semua blogger.
tapi untuk mendapatkan the first rank di google caranya ada banyak..
nah kali ini penulis ingin sharing bagaimana agar blog kita menjadi terkenal dan menjadi top rank di salah satu search engine.
salah satu atau beberapa adalah sebagai berikut :
nah strateginya adalah sebagai berikut :
1. buat postingan dengan menggunakan bahasa yg banyak diminati googling mania, agar search engine dapat dengan mudah menemukan blog anda sebagai salah satunya.
2. selalu update blog anda minimal seminggu sekali, tujuannya agar blog anda selalu berada pada top rank.
3. selalu tinggalkan pesan Link Back pada shoutbox atau setiap memberi komentar pada blog yg anda jelajahi..tujuannya agar sang empu-nya blog membuka link blog anda.
4. selalu buat postingan yg up to date,,tujuannya agar blog anda menjadi salah satu dari beberapa blog yg dicari oleh googling mania.
5. perindah tampilan blog mu agar para pengunjung betah berlama-lama di area blog mu.
6. mungkin ini yg terakhir dari beberapa saran agar blog cepat terkenal, yaitu jaga blog mu agar jgn terlalu berat saat pengunjung membuka blog mua,tujuannya agar para pengunjung tidak Bhete karena blog terkesan terlalu lama saat dibuka.
Nah mungkin segini dulu tips dari saya agar blog kita semua menjadi cepat terkenal dan berada pada top rank di search engine...
Rabu, 03 Juni 2009
FIFO (First In First Out)
FIFO (First In First Out)
FIFO adalah suatu metoda pembuatan Linked List dimana data yang masuk paling awal adalah data yang keluar paling awal juga. Hal ini dapat dianalogikan (dalam kehidupan sehari-hari) misalkan saat sekelompok orang yang datang (ENQUEUE) mengantri hendak membeli tiket di loket.
Jika Linked List dibuat dengan metode FIFO, maka terjadi penambahan/Insert simpul di depan.
PROCEDURE INSERT
Head
Penggalan procedure INSERT untuk FIFO
{head mula-mula selalu diidentifikasikan sebagai nil}
Now Head Tail
Now
Head Tail
Now
Head Tail
Head Tail Now
Head Now Tail
Head Now Tail
Head Now Tail
Procedure dan Function Linked List Lainnya
Selain procedure insert di atas, pada linked list juhga terdapat procedure serta function lainnya.
Di bawah ini diberikan procedure-procedure serta function umum dalam aplikasi Linked List.
Create : Membuat sebuah linked list yang baru dan masih kososng. (ket: procedure ini wajib dilakukan sebelum menggunakan linked list)
Head Tail
Empty : Function untuk menentukan apakah linked list kosong atau tidak.
Find First : Mencari elemen pertama dari linked list
Head Now Tail
Find Next : Mencari elemen sesudah elemen yang ditunjuk now.
Head Now Tail
(ket: gambar lanjutan dari sebelumnya)
Retrieve : Mengambil elemen yang ditunjuk oleh now. Elemen tersebut lalu ditampung pada suatu variabel (di bawah dicontohkan variabel r).
Update : Mengubah elemen yang ditunjuk oleh now dengan isi dari suatu variabel (di bawah dicontohkan variabel u).
Head Now Tail
Delete Now : Menghapus elemen yang ditunjuk oleh now. Jika yang dihapus adalah elemen pertama dari linked list(head), maka head akan berpindah ke elemen berikut.
Head x Now Tail
Head x Now Tail
Delete Head : Menghapus elemen yang ditunjuj head. Head berpindah ke elemen sesudahnya.
Now Head Tail
Head Now Tail
Clear : Untuk menghapus linked list yang sudah ada.wajib dilakukan bila ingin mengakhiri program yang menggunakan linked list. Jika tidak data-data yang dialokasikan ke memori pada program sebelumnya akan tetap tertinggal di dalam memori.
Latihan Soal beserta jawaban (Listing Program) dan penjelasan
Buatlah sebuah program untuk mendeteksi password/ kata sandi. Gunakan metode single linked list. Jika passwordnya benar, program akan selesai, jika salah maka user akan diminta memasukkan password kembali. (passw.pas)
Jawaban :
Uses crt;
Type
Point = ^Rec;
Rec = record
Isi : char;
Next : point;
End;
Const
Password = ‘pascal’; {password yang harus dimasukkan}
Var
i : byte;
Tekan : char;
Passwd : Boolean;
Head, Tail, Now : Point;
Procedure Create;
Begin
Head:=nil;
Tail:=nil;
End;
Procedure Push(isi:char);
Var Now:point;
Begin
New(now); {membuat simpul baru}
If Head=Nil then {mendeteksi simpul awal}
Begin
Head:=Now;
Tail:=Head;
end else
begin {menyambung simpul yang baru pada simpul yang sudah ada}
Tail^.next:=Now;
Tail:=Tail^.Next;
end;
Now^.isi:=isi; {mengisi simpul yang baru}
Now^.next:=Nil;
end;
Function Check:Boolean; {function untuk mencheck input}
Var Temp : string[15];
Begin
Temp:=’ ‘; Now:=Head;
While Now <> nil do
Begin
Temp:=temp + Now^.isi;
Now:=Now^.next;
End;
If temp <> Password then check:=False;
End;
Procedure BuatBingkai(x1,y1,x2,y2:byte); {tampilan aplikasi}
Var i : byte;
Begin
GotoXY (x1,y1); write(‘ ’); GotoXY (x2,y1); write (‘ ‘);
GotoXY (x1,y2); write(‘ ’); GotoXY (x2,y2); write (‘ ’);
For i := x1+1 to x2-1 do
Begin
GotoXY (i,y1); write (‘-‘);
GotoXY (i,y2); write (‘-’);
End;
For i := y1+1 to y2-1 do
Begin
GotoXY(x1, i); write(‘ ‘);
GotoXY(x2, i); write (‘ ‘);
End;
End;
Procedure Pop; {procedure penghapus simpul}
Begin
Now:=head;
head:=head^.next;
While Now <> nil do
Begin
Dispose(Now);
Now:=head;
Head:=head^.next;
End;
End;
Begin {program utama}
Repeat
Create; I:=0;
Repeat
Tekan:=ReadKey;
Write(Tekan);
If Tekan <>#13 then Push(Tekan); inc(i);
Until (Tekan= #13) or (I=10); {enter ditekan atau panjang = 10}
Passwd:=check; Pop;
Until Passwd;
End.
MODUL 9
TREE
Tree
Merupakan salah satu bentuk struktur data tidak linear yang menggambarkan hubungan yang bersifat hirarkis (hubungan one to many) antara elemen-elemen. Tree bisa didefinisikan sebagai kumpulan simpul/node dengan satu elemen khusus yang disebut Root dan node lainnya terbagi menjadi himpunan-himpunan yang saling tak berhubungan satu sama lainnya (disebut subtree). Untuk jelasnya, di bawah akan diuraikan istilah-istilah umum dalam tree :
a) Prodecessor : node yang berada diatas node tertentu.
b) Successor : node yang berada di bawah node tertentu.
c) Ancestor : seluruh node yang terletak sebelum node tertentu dan terletak pada jalur yang sama.
d) Descendant : seluruh node yang terletak sesudah node tertentu dan terletak pada jalur yang sama.
e) Parent : predecssor satu level di atas suatu node.
f) Child : successor satu level di bawah suatu node.
g) Sibling : node-node yang memiliki parent yang sama dengan suatu node.
h) Subtree : bagian dari tree yang berupa suatu node beserta descendantnya dan memiliki semua karakteristik dari tree tersebut.
i) Size : banyaknya node dalam suatu tree.
j) Height : banyaknya tingkatan/level dalam suatu tree.
k) Root : satu-satunya node khusus dalam tree yang tak punya predecssor.
l) Leaf : node-node dalam tree yang tak memiliki seccessor.
m) Degree : banyaknya child yang dimiliki suatu node.
Contoh :
Beberapa jenis Tree yang memiliki sifat khusus :
1) Binary Tree
Binary Tree adalah tree dengan syarat bahwa tiap node hanya boleh memiliki maksimal dua subtree dan kedua subtree tersebut harus terpisah. Sesuai dengan definisi tersebut, maka tiap node dalam binary tree hanya boleh memiliki paling banyak dua child.
Jenis-jenis Binary Tree :
a) Full Binary Tree
Binary Tree yang tiap nodenya (kecuali leaf) memiliki dua child dan tiap subtree harus mempunyai panjang path yang sama.
b) Complete Binary Tree
Mirip dengan Full Binary Tree, namun tiap subtree boleh memiliki panjang path yang berbeda. Node kecuali leaf memiliki 0 atau 2 child.
c) Skewed Binary Tree
akni Binary Tree yang semua nodenya (kecuali leaf) hanya memiliki satu child.
Implementasi Binary Tree
Binary Tree dapat diimplemntasikan dalam Pascal dengan menggunakan double Linked List. Untuk nodenya, bisa dideklarasikan sbb :
Type Tree = ^node;
Node = record
Isi : TipeData;
Left,Right : Tree;
end;
Contoh ilustrasi Tree yang disusun dengan double linked list :
(Ket: LC=Left Child; RC=Right Child)
Operasi-operasi pada Binary Tree :
Create : Membentuk binary tree baru yang masih kosong.
Clear : Mengosongkan binary tree yang sudah ada.
Empty : Function untuk memeriksa apakah binary tree masih kosong.
Insert : Memasukkan sebuah node ke dalam tree. Ada tiga pilihan insert: sebagai root, left child, atau right child. Khusus insert sebagai root, tree harus dalam keadaan kosong.
Find : Mencari root, parent, left child, atau right child dari suatu node. (Tree tak boleh kosong)
Update : Mengubah isi dari node yang ditunjuk oleh pointer current. (Tree tidak boleh kosong)
Retrieve : Mengetahui isi dari node yang ditunjuk pointer current. (Tree tidak boleh kosong)
DeleteSub : Menghapus sebuah subtree (node beserta seluruh descendantnya) yang ditunjuk current. Tree tak boleh kosong. Setelah itu pointer current akan berpindah ke parent dari node yang dihapus.
Characteristic : Mengetahui karakteristik dari suatu tree, yakni : size, height, serta average lengthnya. Tree tidak boleh kosong. (Average Length = [jumlahNodeLvl1*1+jmlNodeLvl2*2+…+jmlNodeLvln*n]/Size)
Traverse : Mengunjungi seluruh node-node pada tree, masing-masing sekali. Hasilnya adalah urutan informasi secara linier yang tersimpan dalam tree. Ada tiga cara traverse : Pre Order, In Order, dan Post Order.
Langkah-Langkahnya Traverse :
PreOrder : Cetak isi node yang dikunjungi, kunjungi Left Child, kunjungi Right Child.
InOrder : Kunjungi Left Child, Cetak isi node yang dikunjungi, kunjungi Right Child.
PostOrder : Kunjungi Left Child, Kunjungi Right Child, cetak isi node yang dikunjungi.
Untuk lebih jelasnya perhatikan contoh operasi-operasi pada Binary Tree berikut ini :
Memasukkan sebuah node ke dalam Tree yang masih kosong (Sebagai Tree)
Menambahkan sebuah node sebagai right child dari Root.
Menambahkan sebuah node sebagai left child dari node yang sebelunya di-insert.
Memindahkan pointer ke Root kemudian menambhakan sebuah node sebagai left child dari root.
Menambhakan sebuah node sebagai left child dari node yang sebelumnya di-insert.
Memindahkan pointer ke Root, kemudian pindahkan lagi pointer ke right child dari Root, kemudian masukkan sebuah node sebagai right child dari node yang sedang ditunjuk oleh pointer.
2) Binary search Tree
Adalah Binary Tree dengan sifat bahwa semua left child harus lebih kecil daripada right child dan parentnya. Juga semua right child harus lebih besar dari left child serta parentnya. Binary seach tree dibuat untuk mengatasi kelemahan pada binary tree biasa, yaitu kesulitan dalam searching / pencarian node tertentu dalam binary tree. Contoh binary search tree umum :
Pada dasarnya operasi dalam binary search tree sama dengan Binary tree biasa, kecuali pada operasi insert, update, dan delete.
1. Insert : Pada Binary Search Tree, insert dilakukan setelah ditemukan lokasi yang tepat. (Lokasi tidak ditentukan oleh user sendiri).
Memasukkan sebuah node yang berisi angka 12. Karena tree masih kosong, maka secara otomatis node tersebut menjadi root.
Karena 15 lebih besar dari 12, maka sesuai dengan peraturan harus berada disebelah kanan parent (right child)
Karena 13 lebih besar dari 12, maka sesuai dengan peraturan harus berada di sebelah kanan parent (12), lalu bandingkan lagi dengan 15. karena lebih kecil maka 13 menempati left child dari 15.
Proses yang sama seperti sebelumnya berlaku untuk selanjutnya.
2. Update : Seperti pada Binary Tree biasa, namun disini uapte akan berpengaruh pada posisi node tersebut selanjutnya. Bila setelah diupdate mengakibatkan tree tersebut bukan Binary Search Tree lagi, maka harus dilakukan perubahan pada tree dengan melakukan perubahan pada tree dengan melakukan rotasi supaya tetap menjadi Binary Search Tree.
3. Delete : Seperti halnya update, delete dalam Binary Search Tree juga turut mempengaruhi struktur dari tree tersebut.
(Keadaan awal merupakan lanjutan gambar sebelumnya)
Karena node yang berisi 5 adalah leaf, maka ia dapat langsung dihapus.
Karena node yang berisi 20 adalah leaf, maka ia dapat langsung dihapus.
Pada operasi di samping, delete dilakukan terhadap Node dengan 2 child. Maka untuk menggantikannya, diambil node paling kiri dari Right SubTree yaitu 13.
Pada operasi di samping, delete dilakukan terhadap node dengan 1 child. Maka child tersebut (11) akan menggantikan posisi dari node yang didelete (9).
MODUL 10
SORT
Definisi Sort
Sort adalah proses pengurutan data yang sebelumnya disusun secara acak sehingga menjadi tersusun secara teratur menurut suatu aturan tertentu.
Pada umumnya terdapat 2 jenis pengurutan :
Ascending (Naik)
Descending (Turun)
Contoh :
Data Acak : 5 6 8 1 3 25 10
Terurut Ascending : 1 3 5 6 8 10 25
Terurut Descending : 25 10 8 6 5 3 1
FIFO adalah suatu metoda pembuatan Linked List dimana data yang masuk paling awal adalah data yang keluar paling awal juga. Hal ini dapat dianalogikan (dalam kehidupan sehari-hari) misalkan saat sekelompok orang yang datang (ENQUEUE) mengantri hendak membeli tiket di loket.
Jika Linked List dibuat dengan metode FIFO, maka terjadi penambahan/Insert simpul di depan.
PROCEDURE INSERT
Head
Penggalan procedure INSERT untuk FIFO
{head mula-mula selalu diidentifikasikan sebagai nil}
Now Head Tail
Now
Head Tail
Now
Head Tail
Head Tail Now
Head Now Tail
Head Now Tail
Head Now Tail
Procedure dan Function Linked List Lainnya
Selain procedure insert di atas, pada linked list juhga terdapat procedure serta function lainnya.
Di bawah ini diberikan procedure-procedure serta function umum dalam aplikasi Linked List.
Create : Membuat sebuah linked list yang baru dan masih kososng. (ket: procedure ini wajib dilakukan sebelum menggunakan linked list)
Head Tail
Empty : Function untuk menentukan apakah linked list kosong atau tidak.
Find First : Mencari elemen pertama dari linked list
Head Now Tail
Find Next : Mencari elemen sesudah elemen yang ditunjuk now.
Head Now Tail
(ket: gambar lanjutan dari sebelumnya)
Retrieve : Mengambil elemen yang ditunjuk oleh now. Elemen tersebut lalu ditampung pada suatu variabel (di bawah dicontohkan variabel r).
Update : Mengubah elemen yang ditunjuk oleh now dengan isi dari suatu variabel (di bawah dicontohkan variabel u).
Head Now Tail
Delete Now : Menghapus elemen yang ditunjuk oleh now. Jika yang dihapus adalah elemen pertama dari linked list(head), maka head akan berpindah ke elemen berikut.
Head x Now Tail
Head x Now Tail
Delete Head : Menghapus elemen yang ditunjuj head. Head berpindah ke elemen sesudahnya.
Now Head Tail
Head Now Tail
Clear : Untuk menghapus linked list yang sudah ada.wajib dilakukan bila ingin mengakhiri program yang menggunakan linked list. Jika tidak data-data yang dialokasikan ke memori pada program sebelumnya akan tetap tertinggal di dalam memori.
Latihan Soal beserta jawaban (Listing Program) dan penjelasan
Buatlah sebuah program untuk mendeteksi password/ kata sandi. Gunakan metode single linked list. Jika passwordnya benar, program akan selesai, jika salah maka user akan diminta memasukkan password kembali. (passw.pas)
Jawaban :
Uses crt;
Type
Point = ^Rec;
Rec = record
Isi : char;
Next : point;
End;
Const
Password = ‘pascal’; {password yang harus dimasukkan}
Var
i : byte;
Tekan : char;
Passwd : Boolean;
Head, Tail, Now : Point;
Procedure Create;
Begin
Head:=nil;
Tail:=nil;
End;
Procedure Push(isi:char);
Var Now:point;
Begin
New(now); {membuat simpul baru}
If Head=Nil then {mendeteksi simpul awal}
Begin
Head:=Now;
Tail:=Head;
end else
begin {menyambung simpul yang baru pada simpul yang sudah ada}
Tail^.next:=Now;
Tail:=Tail^.Next;
end;
Now^.isi:=isi; {mengisi simpul yang baru}
Now^.next:=Nil;
end;
Function Check:Boolean; {function untuk mencheck input}
Var Temp : string[15];
Begin
Temp:=’ ‘; Now:=Head;
While Now <> nil do
Begin
Temp:=temp + Now^.isi;
Now:=Now^.next;
End;
If temp <> Password then check:=False;
End;
Procedure BuatBingkai(x1,y1,x2,y2:byte); {tampilan aplikasi}
Var i : byte;
Begin
GotoXY (x1,y1); write(‘ ’); GotoXY (x2,y1); write (‘ ‘);
GotoXY (x1,y2); write(‘ ’); GotoXY (x2,y2); write (‘ ’);
For i := x1+1 to x2-1 do
Begin
GotoXY (i,y1); write (‘-‘);
GotoXY (i,y2); write (‘-’);
End;
For i := y1+1 to y2-1 do
Begin
GotoXY(x1, i); write(‘ ‘);
GotoXY(x2, i); write (‘ ‘);
End;
End;
Procedure Pop; {procedure penghapus simpul}
Begin
Now:=head;
head:=head^.next;
While Now <> nil do
Begin
Dispose(Now);
Now:=head;
Head:=head^.next;
End;
End;
Begin {program utama}
Repeat
Create; I:=0;
Repeat
Tekan:=ReadKey;
Write(Tekan);
If Tekan <>#13 then Push(Tekan); inc(i);
Until (Tekan= #13) or (I=10); {enter ditekan atau panjang = 10}
Passwd:=check; Pop;
Until Passwd;
End.
MODUL 9
TREE
Tree
Merupakan salah satu bentuk struktur data tidak linear yang menggambarkan hubungan yang bersifat hirarkis (hubungan one to many) antara elemen-elemen. Tree bisa didefinisikan sebagai kumpulan simpul/node dengan satu elemen khusus yang disebut Root dan node lainnya terbagi menjadi himpunan-himpunan yang saling tak berhubungan satu sama lainnya (disebut subtree). Untuk jelasnya, di bawah akan diuraikan istilah-istilah umum dalam tree :
a) Prodecessor : node yang berada diatas node tertentu.
b) Successor : node yang berada di bawah node tertentu.
c) Ancestor : seluruh node yang terletak sebelum node tertentu dan terletak pada jalur yang sama.
d) Descendant : seluruh node yang terletak sesudah node tertentu dan terletak pada jalur yang sama.
e) Parent : predecssor satu level di atas suatu node.
f) Child : successor satu level di bawah suatu node.
g) Sibling : node-node yang memiliki parent yang sama dengan suatu node.
h) Subtree : bagian dari tree yang berupa suatu node beserta descendantnya dan memiliki semua karakteristik dari tree tersebut.
i) Size : banyaknya node dalam suatu tree.
j) Height : banyaknya tingkatan/level dalam suatu tree.
k) Root : satu-satunya node khusus dalam tree yang tak punya predecssor.
l) Leaf : node-node dalam tree yang tak memiliki seccessor.
m) Degree : banyaknya child yang dimiliki suatu node.
Contoh :
Beberapa jenis Tree yang memiliki sifat khusus :
1) Binary Tree
Binary Tree adalah tree dengan syarat bahwa tiap node hanya boleh memiliki maksimal dua subtree dan kedua subtree tersebut harus terpisah. Sesuai dengan definisi tersebut, maka tiap node dalam binary tree hanya boleh memiliki paling banyak dua child.
Jenis-jenis Binary Tree :
a) Full Binary Tree
Binary Tree yang tiap nodenya (kecuali leaf) memiliki dua child dan tiap subtree harus mempunyai panjang path yang sama.
b) Complete Binary Tree
Mirip dengan Full Binary Tree, namun tiap subtree boleh memiliki panjang path yang berbeda. Node kecuali leaf memiliki 0 atau 2 child.
c) Skewed Binary Tree
akni Binary Tree yang semua nodenya (kecuali leaf) hanya memiliki satu child.
Implementasi Binary Tree
Binary Tree dapat diimplemntasikan dalam Pascal dengan menggunakan double Linked List. Untuk nodenya, bisa dideklarasikan sbb :
Type Tree = ^node;
Node = record
Isi : TipeData;
Left,Right : Tree;
end;
Contoh ilustrasi Tree yang disusun dengan double linked list :
(Ket: LC=Left Child; RC=Right Child)
Operasi-operasi pada Binary Tree :
Create : Membentuk binary tree baru yang masih kosong.
Clear : Mengosongkan binary tree yang sudah ada.
Empty : Function untuk memeriksa apakah binary tree masih kosong.
Insert : Memasukkan sebuah node ke dalam tree. Ada tiga pilihan insert: sebagai root, left child, atau right child. Khusus insert sebagai root, tree harus dalam keadaan kosong.
Find : Mencari root, parent, left child, atau right child dari suatu node. (Tree tak boleh kosong)
Update : Mengubah isi dari node yang ditunjuk oleh pointer current. (Tree tidak boleh kosong)
Retrieve : Mengetahui isi dari node yang ditunjuk pointer current. (Tree tidak boleh kosong)
DeleteSub : Menghapus sebuah subtree (node beserta seluruh descendantnya) yang ditunjuk current. Tree tak boleh kosong. Setelah itu pointer current akan berpindah ke parent dari node yang dihapus.
Characteristic : Mengetahui karakteristik dari suatu tree, yakni : size, height, serta average lengthnya. Tree tidak boleh kosong. (Average Length = [jumlahNodeLvl1*1+jmlNodeLvl2*2+…+jmlNodeLvln*n]/Size)
Traverse : Mengunjungi seluruh node-node pada tree, masing-masing sekali. Hasilnya adalah urutan informasi secara linier yang tersimpan dalam tree. Ada tiga cara traverse : Pre Order, In Order, dan Post Order.
Langkah-Langkahnya Traverse :
PreOrder : Cetak isi node yang dikunjungi, kunjungi Left Child, kunjungi Right Child.
InOrder : Kunjungi Left Child, Cetak isi node yang dikunjungi, kunjungi Right Child.
PostOrder : Kunjungi Left Child, Kunjungi Right Child, cetak isi node yang dikunjungi.
Untuk lebih jelasnya perhatikan contoh operasi-operasi pada Binary Tree berikut ini :
Memasukkan sebuah node ke dalam Tree yang masih kosong (Sebagai Tree)
Menambahkan sebuah node sebagai right child dari Root.
Menambahkan sebuah node sebagai left child dari node yang sebelunya di-insert.
Memindahkan pointer ke Root kemudian menambhakan sebuah node sebagai left child dari root.
Menambhakan sebuah node sebagai left child dari node yang sebelumnya di-insert.
Memindahkan pointer ke Root, kemudian pindahkan lagi pointer ke right child dari Root, kemudian masukkan sebuah node sebagai right child dari node yang sedang ditunjuk oleh pointer.
2) Binary search Tree
Adalah Binary Tree dengan sifat bahwa semua left child harus lebih kecil daripada right child dan parentnya. Juga semua right child harus lebih besar dari left child serta parentnya. Binary seach tree dibuat untuk mengatasi kelemahan pada binary tree biasa, yaitu kesulitan dalam searching / pencarian node tertentu dalam binary tree. Contoh binary search tree umum :
Pada dasarnya operasi dalam binary search tree sama dengan Binary tree biasa, kecuali pada operasi insert, update, dan delete.
1. Insert : Pada Binary Search Tree, insert dilakukan setelah ditemukan lokasi yang tepat. (Lokasi tidak ditentukan oleh user sendiri).
Memasukkan sebuah node yang berisi angka 12. Karena tree masih kosong, maka secara otomatis node tersebut menjadi root.
Karena 15 lebih besar dari 12, maka sesuai dengan peraturan harus berada disebelah kanan parent (right child)
Karena 13 lebih besar dari 12, maka sesuai dengan peraturan harus berada di sebelah kanan parent (12), lalu bandingkan lagi dengan 15. karena lebih kecil maka 13 menempati left child dari 15.
Proses yang sama seperti sebelumnya berlaku untuk selanjutnya.
2. Update : Seperti pada Binary Tree biasa, namun disini uapte akan berpengaruh pada posisi node tersebut selanjutnya. Bila setelah diupdate mengakibatkan tree tersebut bukan Binary Search Tree lagi, maka harus dilakukan perubahan pada tree dengan melakukan perubahan pada tree dengan melakukan rotasi supaya tetap menjadi Binary Search Tree.
3. Delete : Seperti halnya update, delete dalam Binary Search Tree juga turut mempengaruhi struktur dari tree tersebut.
(Keadaan awal merupakan lanjutan gambar sebelumnya)
Karena node yang berisi 5 adalah leaf, maka ia dapat langsung dihapus.
Karena node yang berisi 20 adalah leaf, maka ia dapat langsung dihapus.
Pada operasi di samping, delete dilakukan terhadap Node dengan 2 child. Maka untuk menggantikannya, diambil node paling kiri dari Right SubTree yaitu 13.
Pada operasi di samping, delete dilakukan terhadap node dengan 1 child. Maka child tersebut (11) akan menggantikan posisi dari node yang didelete (9).
MODUL 10
SORT
Definisi Sort
Sort adalah proses pengurutan data yang sebelumnya disusun secara acak sehingga menjadi tersusun secara teratur menurut suatu aturan tertentu.
Pada umumnya terdapat 2 jenis pengurutan :
Ascending (Naik)
Descending (Turun)
Contoh :
Data Acak : 5 6 8 1 3 25 10
Terurut Ascending : 1 3 5 6 8 10 25
Terurut Descending : 25 10 8 6 5 3 1
POINTER
POINTER
Variabel Pointer
Pada materi sebelumnya telah dijelaskan mengenai variabel bertipe array, suatu tipe data yang bersifat statis (ukuran dan urutannya sudah pasti). Selain itu ruang memori yang dipakai olehnya tidak dapat dihapus bila variabel bertipe array tersebut sudah tidak digunakan lagi pada saat program dijalankan. Untuk memecahkan masalah diatas, kita dapat menggunakan variabel pointer. Tipe data pointer bersifat dinamis, variabel akan dialokasikan hanya pada saat dibutuhkan dan sesudah tidak dibutuhkan dapat dialokasikan kembali.
Array vs Pointer
Berikut tabel di bawah ini diberikan perbedaan antara variabel bertipe array dengan varibel bertipe pointer.
Kriteria Array Pointer
Sifat Statis Dinamis
Ukuran Pasti Sesuai kebutuhan
Alokasi variabel Saat program dijalankan sampai selesai Dapat diatur sesuai kebutuhuan
Deklarasi Variabel Pointer
Bentuk umum :
Var : <^tipedata>
Contoh :
Var
Jumlahdata : ^integer;
Namasiswa :^string[25];
Nilaisiswa :^real;
Pendeklarasian variabel pointer tidak jauh berbeda dengan pendeklarasian variabel biasa, hanya perlu ditambahan simbol topi (^) sebelum tipe datanya. Simbol topi tersebut menandahkan bahwa variabel tersebut menunjuk ke lokasi tertentu pada memori.
Anda juga dapat membuat variabel pointer bertipe record yang anda definisikan sendiri. Pendeklarasiannya adalah seperti berikut ini.
Bentuk umum :
Tipe
= <^namarecord>;
= record
:;
:;
…
:;
end;
Var
:;
contoh :
Type
PointMhs = ^RecMhs;
RecMhs = record
Nama : string[25];
NIM : string[10];
Alm : string[30];
IPK : real;
End;
var
datamahasiswa : pointMhs;
Varibel Biasa vs Variabel Pointer
Variabel Pointer adalah suatu variabel yang menunjuk ke alamat memori yang digunakan untuk menampung data yang akan diproses, seperti digambarkan dibawah ini:
memori
P 0100
0200
0300
…
FFFF
P adalah variabel pointer yang menunjuk ke alamat memori 100 yang berisi data bertipe string “Aku”. Apabila anda ingin menambah data dengan menggunakan variabel yang berbeda, maka anda dapat mendeklarasikan variabel pointer baru misalnya Q dan R dst sehingga tampak sbb :
memori
P 0100
Q 0200
R 0300
…
FFFF
Untuk membedakan antara variabel pointer dengan variabel biasa, perhatikan contoh berikut :
Single Linked List
Apabila setiap kali anda ingin menambahkan data selalu dengan menggunakan variabel pointer yang baru, anda akan membutuhkan banyak sekali variabel pointer(penunjuk).
Oleh karena itu ada baiknya jika anda hanya menggunakan satu variabel pointer saja untuk menyimpan banyak data dengan metode yang kita sebut Linked List. Jika diterjemahkan, maka berarti suatu daftar isi yang saling berhubungan. Untuk lebih jelasnya perhatikan gambar di bawah ini :
memori
P 0100
0200
0300
… Nill
FFFF
Pada gambar diatas tampak bahwa sebuah data terletak pada sebuah lokasi memory area. Tempat yang disediakan pada suatu area memory tertentu untuk menyimpan data dikenal dengan sebutan node/simpul. Pada setiap node memiliki pointer(penunjuk) yang menunjuk ke simpul berikutnya sehingga terbentuk suatu untaian dan dengan demikian hanya diperlukan sebuah variabel pointer. Susunan berupa untaian semacam ini disebut Single Linked List. (ket: Nill tak memiliki nilai apapun. Biasanya linked list pada titik akhirnya akan menunjuk ke Nill).
Dalam pembuatan single linked list dapat menggunakan 2 metode :
LIFO (Last In First Out), aplikasi : Stack(Tumpukan).
FIFO (First In First Out), aplikasi : Queue(Antrian).
LIFO (Last In First Out)
LIFO adalah suatu metode pembuatan linked list, dimana data yang masuk paling akhir adalah data yang keluar paling awal. Hal ini dapat dianalogikan (dalam kehidupan sehari-hari) pada saat anda menumpuk barang, seperti digambarkan di bawah ini :
(keadaan mula-mula
adalah kosong)
Pembuatan sebuah simpul dalam suatu linked list seperti digambarkan diatas disebut dengan istilah INSERT. Jika linked list dibuat dengan metode LIFO, maka terjadi penambahan/insert simpul di belakang.
PROSEDURE INSERT
Istilah insert berarti menambahkan sebuah simpul baru ke dalam suatu linked list. Berikut di bawah ini adalah penggalan listing prosecure insert untuk LIFO berserta contoh dan penjelasan cara kerjanya.
Penggalan deklarasi tipe data dan variabel di atas ini akan dipakai pada penjelasan procedure-procedure selanjutnya.
Penggalan procedure INSERT untuk LIFO
Head
(ket : head mula-mula selalu dideklarasikan sebagai nil)
Now
Now Head
Now
Variabel Pointer
Pada materi sebelumnya telah dijelaskan mengenai variabel bertipe array, suatu tipe data yang bersifat statis (ukuran dan urutannya sudah pasti). Selain itu ruang memori yang dipakai olehnya tidak dapat dihapus bila variabel bertipe array tersebut sudah tidak digunakan lagi pada saat program dijalankan. Untuk memecahkan masalah diatas, kita dapat menggunakan variabel pointer. Tipe data pointer bersifat dinamis, variabel akan dialokasikan hanya pada saat dibutuhkan dan sesudah tidak dibutuhkan dapat dialokasikan kembali.
Array vs Pointer
Berikut tabel di bawah ini diberikan perbedaan antara variabel bertipe array dengan varibel bertipe pointer.
Kriteria Array Pointer
Sifat Statis Dinamis
Ukuran Pasti Sesuai kebutuhan
Alokasi variabel Saat program dijalankan sampai selesai Dapat diatur sesuai kebutuhuan
Deklarasi Variabel Pointer
Bentuk umum :
Var
Contoh :
Var
Jumlahdata : ^integer;
Namasiswa :^string[25];
Nilaisiswa :^real;
Pendeklarasian variabel pointer tidak jauh berbeda dengan pendeklarasian variabel biasa, hanya perlu ditambahan simbol topi (^) sebelum tipe datanya. Simbol topi tersebut menandahkan bahwa variabel tersebut menunjuk ke lokasi tertentu pada memori.
Anda juga dapat membuat variabel pointer bertipe record yang anda definisikan sendiri. Pendeklarasiannya adalah seperti berikut ini.
Bentuk umum :
Tipe
…
end;
Var
contoh :
Type
PointMhs = ^RecMhs;
RecMhs = record
Nama : string[25];
NIM : string[10];
Alm : string[30];
IPK : real;
End;
var
datamahasiswa : pointMhs;
Varibel Biasa vs Variabel Pointer
Variabel Pointer adalah suatu variabel yang menunjuk ke alamat memori yang digunakan untuk menampung data yang akan diproses, seperti digambarkan dibawah ini:
memori
P 0100
0200
0300
…
FFFF
P adalah variabel pointer yang menunjuk ke alamat memori 100 yang berisi data bertipe string “Aku”. Apabila anda ingin menambah data dengan menggunakan variabel yang berbeda, maka anda dapat mendeklarasikan variabel pointer baru misalnya Q dan R dst sehingga tampak sbb :
memori
P 0100
Q 0200
R 0300
…
FFFF
Untuk membedakan antara variabel pointer dengan variabel biasa, perhatikan contoh berikut :
Single Linked List
Apabila setiap kali anda ingin menambahkan data selalu dengan menggunakan variabel pointer yang baru, anda akan membutuhkan banyak sekali variabel pointer(penunjuk).
Oleh karena itu ada baiknya jika anda hanya menggunakan satu variabel pointer saja untuk menyimpan banyak data dengan metode yang kita sebut Linked List. Jika diterjemahkan, maka berarti suatu daftar isi yang saling berhubungan. Untuk lebih jelasnya perhatikan gambar di bawah ini :
memori
P 0100
0200
0300
… Nill
FFFF
Pada gambar diatas tampak bahwa sebuah data terletak pada sebuah lokasi memory area. Tempat yang disediakan pada suatu area memory tertentu untuk menyimpan data dikenal dengan sebutan node/simpul. Pada setiap node memiliki pointer(penunjuk) yang menunjuk ke simpul berikutnya sehingga terbentuk suatu untaian dan dengan demikian hanya diperlukan sebuah variabel pointer. Susunan berupa untaian semacam ini disebut Single Linked List. (ket: Nill tak memiliki nilai apapun. Biasanya linked list pada titik akhirnya akan menunjuk ke Nill).
Dalam pembuatan single linked list dapat menggunakan 2 metode :
LIFO (Last In First Out), aplikasi : Stack(Tumpukan).
FIFO (First In First Out), aplikasi : Queue(Antrian).
LIFO (Last In First Out)
LIFO adalah suatu metode pembuatan linked list, dimana data yang masuk paling akhir adalah data yang keluar paling awal. Hal ini dapat dianalogikan (dalam kehidupan sehari-hari) pada saat anda menumpuk barang, seperti digambarkan di bawah ini :
(keadaan mula-mula
adalah kosong)
Pembuatan sebuah simpul dalam suatu linked list seperti digambarkan diatas disebut dengan istilah INSERT. Jika linked list dibuat dengan metode LIFO, maka terjadi penambahan/insert simpul di belakang.
PROSEDURE INSERT
Istilah insert berarti menambahkan sebuah simpul baru ke dalam suatu linked list. Berikut di bawah ini adalah penggalan listing prosecure insert untuk LIFO berserta contoh dan penjelasan cara kerjanya.
Penggalan deklarasi tipe data dan variabel di atas ini akan dipakai pada penjelasan procedure-procedure selanjutnya.
Penggalan procedure INSERT untuk LIFO
Head
(ket : head mula-mula selalu dideklarasikan sebagai nil)
Now
Now Head
Now
QUEUE ( ANTRIAN )
QUEUE ( ANTRIAN )
- Kumpulan data dimana data masuk dan keluar pada ujung yang berbeda.
- Konsep utama FIFO ( Fisrt In First Out ).
Contoh:
1 2 3
Data nomor 1 datang/masuk dan keluar duluan.
Algoritma:
1. Input/tambah data
• Jika ada input maka no antrian yang semula 0 akan tambah 1 demi 1 sampai maksimal antrian.
2. Hapus/Pengambilan data
• Jika ada pengambilan data maka data dipindahkan di variabel lain contohnya temp, antrian ke-dua akan maju ke antrian pertama dan seterusnya. Dan jumlah antrian yang semula maksimal akan berkurang 1 demi 1 sampai antrian 0 kembali.
1. Deklarasi Queue
Type
Const
Max = 5;
Nama record = Record
Data : type data;
Top : byte;
End;
Nama_array = ARRAY [1..max] of Nama record;
Var
Antri : nama Array;
1 2 3 4
Nama Array----- Barang
Nama Record--- Coba
Nama Variabel-- Antri
Contoh Deklarasi dari gambar diatas:
Type
Coba = record
Data :string;
Top : byte;
End;
Barang = ARRAY [1..4] of coba;
Var Antri:barang;
2. Operasi pada queue
• CREATE
Membuat antrian baru yang masih kosong.
Procedure create;
Begin
antri.top:=0;
End;
• FULL
Untuk memeriksa apakah antrian sudah penih..
Fuction full:bolean;
Begin
antri.top:=max;
End;
• PUSH
Menambah sebuah elemen ( data ) kedalam antrian.
Syarat: tidak bisa dilakukan jika antrian sudah penuh.
Procedure push ( input:string );
Begin
If not full then
Begin
antri.top:=antri.top;
antri.data:=input;
End;
End;
• EMPTY
Fuction empty: bolean;
Begin
Empty:=false;
If top:=0 then empty:=true;
End;
• POP
Mengambil 1 elemen dari sebuah antrian.
Syarat: antrian tidak boleh kosong.
Procedure Pop ( elemen:string );
Begin
If not empty then
Begin
Elemen:=antri.data;
antri.top:=top – 1;
End;
End;
Contoh:
1 2 3
Program antrian_1;
Uses wincrt;
Type
Data= array [1..3] of string;
Var
D: data;
I, antri: integer;
Temp: string;
Begin
Antri:=0;
- Kumpulan data dimana data masuk dan keluar pada ujung yang berbeda.
- Konsep utama FIFO ( Fisrt In First Out ).
Contoh:
1 2 3
Data nomor 1 datang/masuk dan keluar duluan.
Algoritma:
1. Input/tambah data
• Jika ada input maka no antrian yang semula 0 akan tambah 1 demi 1 sampai maksimal antrian.
2. Hapus/Pengambilan data
• Jika ada pengambilan data maka data dipindahkan di variabel lain contohnya temp, antrian ke-dua akan maju ke antrian pertama dan seterusnya. Dan jumlah antrian yang semula maksimal akan berkurang 1 demi 1 sampai antrian 0 kembali.
1. Deklarasi Queue
Type
Const
Max = 5;
Nama record = Record
Data : type data;
Top : byte;
End;
Nama_array = ARRAY [1..max] of Nama record;
Var
Antri : nama Array;
1 2 3 4
Nama Array----- Barang
Nama Record--- Coba
Nama Variabel-- Antri
Contoh Deklarasi dari gambar diatas:
Type
Coba = record
Data :string;
Top : byte;
End;
Barang = ARRAY [1..4] of coba;
Var Antri:barang;
2. Operasi pada queue
• CREATE
Membuat antrian baru yang masih kosong.
Procedure create;
Begin
antri.top:=0;
End;
• FULL
Untuk memeriksa apakah antrian sudah penih..
Fuction full:bolean;
Begin
antri.top:=max;
End;
• PUSH
Menambah sebuah elemen ( data ) kedalam antrian.
Syarat: tidak bisa dilakukan jika antrian sudah penuh.
Procedure push ( input:string );
Begin
If not full then
Begin
antri.top:=antri.top;
antri.data:=input;
End;
End;
• EMPTY
Fuction empty: bolean;
Begin
Empty:=false;
If top:=0 then empty:=true;
End;
• POP
Mengambil 1 elemen dari sebuah antrian.
Syarat: antrian tidak boleh kosong.
Procedure Pop ( elemen:string );
Begin
If not empty then
Begin
Elemen:=antri.data;
antri.top:=top – 1;
End;
End;
Contoh:
1 2 3
Program antrian_1;
Uses wincrt;
Type
Data= array [1..3] of string;
Var
D: data;
I, antri: integer;
Temp: string;
Begin
Antri:=0;
STACK ( Tumpukan )
STACK ( Tumpukan )
- Adalah tumpulan data yang seolah-olah ada data di atas data lain.
- Suatu metode untuk Input dan hapus di dalam memori komputer.
Konsep utama dalam STACK adalah LIFO ( Last In First Out ).
Contoh:
5 Guntur
4 Aditya
3 Tyas
2 Hendra
1 Dyah
Data nomor 1 datang/masuk duluan, data nomor 5 yang paling atas yang keluar terlebih dahulu.
Algoritma:
1. Input/tambah data
• Jika ada input maka no stack/no tumpukan yang semula 0 akan tambah 1 demi 1 sampai maksimal tumpukan.
2. Pengambilan data
• Jika ada pengambilan data maka data dipindahkan di variabel lain contohnya temp. Dan posisi tumpukannya yang semula maksimal akan berkurang 1 demi 1 sampai posisi 0 kembali.
1. Deklarasi STACK
Type
Const
Max = 5;
Nama record = Record
Data : type data;
Top : byte;
End;
Nama_array = ARRAY [1..max] of Nama record;
Var
STACK : nama Array;
1 2 3 4
Nama Array----- Barang
Nama Record--- Coba
Nama Variabel-- Stack
Contoh Deklarasi dari gambar diatas:
Type
Coba = record
Data :string;
Top : byte;
End;
Barang = ARRAY [1..4] of coba;
Var
Stack:barang;
2. Operasi pada STACK
• CREATE
Membuat stack baru yang masih kosong.
Procedure create;
Begin
Stack.top:=0;
End;
• FULL
Untuk memeriksa apakah stack sudah penuh atau belum.
Fuction full:bolean;
Begin
Stack.top:=max;
End;
• PUSH
Menambah sebuah elemen ( data ) kedalam stack
Syarat: tidak bisa dilakukan jika stack sudah penuh.
Procedure push ( input:string );
Begin
If not full then
Begin
Stack.top:=stack.top;
Stack.data:=input;
End;
End;
• EMPTY
Fuction empty: bolean;
Begin
Empty:=false;
If top:=0 then empty:=true;
RECORD (REKAMAN)
RECORD (REKAMAN)
Sebuah record rekaman disusun oleh beberapa field. Tiap field berisi data dari tipe dasar / bentukan tertentu. Record mempunyai kelebihan untuk menyimpan suatu sekumpulan elemen data yang berbeda-beda tipenya (di banding array). Contoh , sebuah record dengan empat buah field.
Field 1 Field 2 Field 3 Field 4
Cara pendeklarasian dari record adalah sbb:
• Mendefinisikan tipe dari record (jumlah field, jenis tipe data yang dipakai),
• Mendefinisikan variabel untuk dilakukan operasi.
SYNTAX
1. Pengaksesan Elemen Record
Nama variable disertai nama field.
2. Pengunaan With … do
Pernyataan with untuk lebih menyederhanakan pengaksesan field-field pada record. Pemrograman dapat mengakses field cukup dengan menyebutkan nama field-nya saja. Misalkan pernyataan :
3.pernyataan ini akan membentuk suatu array dengan 10 elemen. Dimana tiap elemen adalah sebuah record tanggal, yaitu, terdiri atas bulan, hari, tahun dengan tipe data Integer.
Digambarkan seperti berikut:
4. Record di dalam Record
Record bisa berisi record lain sebagai field. Seperti contoh record tanggal dan jam dikombinasikan menjadi sebuah record saat ini,
अर्रे terdiri atas
4. Array Multidimensi
Dalam array multidimensi terdiri atas baris (row) dan kolom (column). Index pertama adalah baris dan yang kedua adalah kolom .
SYNTAX
5. Operasi pada Array
Sifat masing-masing elemen array mengikuti jenis data yang dimilikinya, untuk array dengan tipe bilangan integer atau real kita bisa melakukan berbagai standar operasi aritmatika seperti penjumlahan, perkalian, pengurangan, dsb. Yang perlu di garis bawahi, bahwa sifat dari array dimanfaatkan untuk operasi matrik.
a. Mencari Harga Tertentu pada Array
Mencari suatu elemen data di dalam suatu data merupakan suatu kejadian yang sering kita alami, contoh: mencari nama mahasiswa dari daftar presensi. Pencarian beruntun (sequence), merupakan suatu teknik untuk mencari suatu elemen dalam suatu sistim yang lebih besar.
Contoh.
Misal array A[8], dengan elemen sbb:
A
60 12 76 23 11 42 18 42
Untuk mencari apakah bilangan x=11 ada didalam tabel maka dilakukan pemeriksaan terhadap :
60 12 76 23 11
Sehingga ditemukan x pada elemen ke-5, dalam bahasa PASCAL diterjemahkan seperti berikut:
b. Mencari Harga Maksimum pada Array
Misal array di atas kita cari harga yang tertinggi, maka kita perlu menentukan nilai tertinggi dahulu sebelum melakukan pencarian ; diawali dengan nilai maksimum=0
c. Matrik
Sebagai perwujudan dari array dua dimensi, operasi aritmatika seperti penjumlahan, perkalian, dan pengurangan bisa dilakukan.
Contoh.
- Mendefinisikan Elemen
- Membaca Elemen Matrik
- Menampilkan Elemen Matrik
- Penjumlahkan Matrik
- Pengurangan Matrik
-. Perkalian Matrik
-. Perkalian Matrik
-. Mencari Elemen yang Kosong pada Matrik
ARRAY (LARIK)
ARRAY (LARIK)
1. Pendahuluan
Suatu array adalah sebuah struktur data yang terdiri atas banyak variabel dengan tipe data sama, dimana masing-masing elemen variabel mempunyai nilai indeks. Setiap elemen array mampu untuk menyimpan satu jenis data (yaitu: variabel). Suatu array dinyatakan dengan type, sehingga variabel yang bekerja akan dinyatakan dengan:
contoh type
A = array [1..10] of integer;
1 2 3 4 5 6 7 8 9 10
Secara logika pendefinisian array di atas merupakan sekumpulan kotak , dimana tiap kotak mempunyai nilai indeks integer 1, 2, 3, ...,9, 10 tiap elemen array ditandai dengan:
A[1], A[2], A[3], A[4], A[5], A[6], A[7], A[8], A[9], A[10]
2. Sifat Array
Array merupakan struktur data yang statis, yaitu jumlah elemen yang ada harus ditentukan terlebih dahulu dan tak bisa di ubah saat program berjalan. Untuk menyatakan array dalam PASCAL kita harus terlebih dahulu:
Mendefinisikan jumlah elemen array,
Mendefinisikan tipe data dari elemen array
Contoh. const N=10;
type
A= array [1..N] of integer;
3. Array Satu Dimensi
Pernyataan di atas merupakan penjelasan tentang array dengan satu dimensi. Pendefinisian array secara umum adalah sebagai berikut: jika kita ingin membuat beberapa array dengan tipe/jenis yang sama, kita lebih baik jika mendeklarasikan dengan type selanjutnya dengan deklarasi var.
SYNTAX
Penjelasan: Bawah dan Atas menyatakan batas untuk array. tipe_data adalah merupakan tipe variabel yang dipunyai array (mis. Integer, char, real, dsb)
Contoh:
type intarray = ARRAY [1..20] of integer;
Pernyataan diatas adalah pernyataan untuk membentuk suatu array bernama intarray,yang berisi 20 tempat untuk bilangan integer. Setiap posisi disebut elemen, yang menyimpan suatu bilangan integer.langkah berikutnya adalah membuat suatu variabel kerja dengan tipe intarray yaitu,
var numbers : intarray;
kita bisa melakukan operasi pada setiap elemen dari numbers secara individual. Contoh kita bisa memberi nilai pada suatu elemen array seperti berikut:
numbers[2] := 10;
perintah ini memberikan suatu nilai integer 10 pada elemen ke-2 dari array numbers. Nomor dari elemen ditempatkan didalam kurung tegak. Contoh berikut adalah merupakan array yang menyimpan variabel-variabel integer. Data dengan
Tipe Data यांग अदा dipascal
Tipe Data
Tipe data yang disediakan oleh PASCAL meliputi:
1. Tipe Data Sederhana
merupakan tipe data dasar yang sering dipakai oleh program, meliputi: integer (bilangan bulat), real (bilangan pecahan), char (alphanumerik dan tanda baca), dan boolean (logika). Untuk data integer dan real masing-masing terbagi menjadi beberapa kategori
a.BilanganInteger
merupakan tipe data berupa bilangan bulat, terbagi atas beberapa kategori seperti Contoh bilangan integer adalah: 34 6458 -90 0 1112 Penggolongan tipe data integer tersebut dimaksudkan untuk membatasi alokasi memori yang dibutuhkan misalkan untuk suatu perhitungan dari suatu variabel bilangan diperkirakan nilai maksimumnya 32767 kita cukup mendeklarasikan variabel bilangan sebagai integer (2 byte), daripada sebagai longint(4 byte). Di dalam kompilernya, Pascal menyediakan konstanta untuk bilangan Integer yaitu: MaxInt and MaxLongInt, pemrogram bisa menggunakannya di dalam programnya tanpa harus terlebih dahulu mendefinisikannya.
-MaxInt bernilai 32.767
-MaxLongint bernilai 2.147.483.647.
b. Bilangan Real
Bilangan real atau nyata merupakan jenis bilangan pecahan, dapat dituliskan secara biasa atau model scientific . Contoh bilangan real: 34.265 -3.55 0.0 35.997E+11, dimana E merupakan simbol perpangkatan 10. Jadi 452.13 mempunyai nilai sama dengan 4.5213e2. Penggolongan tipe data bilangan real dapat dilihat pada tabel 2. Bilangan Real
c. Char
Tipe data ini menyimpan karakter yang diketikkan dari keyboard, memiliki 266 macam yang terdapat dalam tabel ASCII (American Standard Code for Information Interchange). Contoh: 'a' 'B' '+', dsb. Yang perlu diingat bahwa dalam menuliskannya harus dengan memakai tanda kutip tunggal. Jenis data ini memerlukan alokasi memori sebesar 1(satu) byte untuk masing-masing data.
d. Tipe Data Boolean
merupakan tipe data logika, yang berisi dua kemungkinan nilai: TRUE (benar) atau FALSE (salah). Turbo Pascal for Windows memiliki tiga macam jenis ini yaitu: Boolean, WordBool, dan LongBool. Tipe boolean memakai memori paling kecil, sedangkan WordBool dan LongBool dipakai untuk menulis program yang sesuai dengan lingkungan Windows.
Dasar Bahasa PASCAL
Dasar Bahasa PASCAL
Unsur-unsur Pemrograman
a. Mendapatkan data dengan membaca data dari default input (key board, file atau sumber data lainnya).
b. Menyimpan data ke dalam memori dengan struktur data yang sesuai,
c. Memproses data dengan instruksi yang tepat.
d. Menyajikan atau mengirimkan hasil olahan data ke default output (monitor, file atau tujuan lainnya).
Jenis identifier
a. Identifier umum
Merupakan identifier yang didefinisikan sendiri oleh pemrogram. Pemrogram mempunyai kebebasan untuk menentukan nama identifiernya, dengan syarat nama tersebut tidak sama dengan identifier standar dan reserved word yang akan dibahas lebih lanjut. Hal ini untuk mencegah kesalahan yang bisa timbul akibat tumpang tindih identifier dalam program.
b. Identifier Standar (Baku)
Merupakan identifier yang didefinisikan oleh pembuat kompiler Pascal. Biasanya pembuat kompiler menyediakan suatu library yang sudah ada didalam kompiler. Library berisi berbagai procedure, fungsi atau unit yang sudah siap pakai. Misalnya Turbo Pascal Windows 1.5 memiliki suatu unit untuk memproses output yaitu wincrt, gotoxy, yang dengan mudah bisa dipakai oleh programmer di dalam menuliskan kode-kode programnya. Dinamai Identifier Standar karena suatu kompiler tidak harus memilikinya, masing-masing kompiler dimungkinkan mempunyai identifier yang berbeda untuk suatu tugas yang hampir sama. Misalnya Turbo Pascal versi DOS menggunakan crt untuk melakukan fungsi yang sama dengan wincrt (TPW 1.5). Beberapa Identifier Standar yang dimiliki oleh kompiler-kompiler Pascal antara lain:
Deklarasi Variable:
Mendeklarasikan varibel adalah:
a. Memberikan nama variabel sebagai identitas pengenal
b. Menentukan tipe data variabel
Struktur Bahasa PASCAL
Struktur Bahasa PASCAL secara umum
Pascal mempunyai struktur sebagai berikut:
1. Bagian Judul Program
2. Bagian Deklarasi
a. Deklarasi tipe data (TYPE)
b. Deklarasi variabel (VAR)
c. Deklarasi konstanta (CONST)
d. Deklarasi label (LABEL)
e. Deklarasi sub-program (PROCEDURE dan FUNCTION)
3. Bagian Program Utama Perintah-perintah.
Teks Pascal setidaknya memiliki bagian Judul Program, bagian Deklarasi, dan Bagian Program Utama yang berupa perintah-perintah. Sedangkan untuk bagian deklarasi menyesuaikan dengan isi dari program itu sendiri. Contoh program PASCAL:
Pascal mempunyai struktur sebagai berikut:
1. Bagian Judul Program
2. Bagian Deklarasi
a. Deklarasi tipe data (TYPE)
b. Deklarasi variabel (VAR)
c. Deklarasi konstanta (CONST)
d. Deklarasi label (LABEL)
e. Deklarasi sub-program (PROCEDURE dan FUNCTION)
3. Bagian Program Utama Perintah-perintah.
Teks Pascal setidaknya memiliki bagian Judul Program, bagian Deklarasi, dan Bagian Program Utama yang berupa perintah-perintah. Sedangkan untuk bagian deklarasi menyesuaikan dengan isi dari program itu sendiri. Contoh program PASCAL:
Pascal
Tipe Data
Tipe data yang disediakan oleh PASCAL meliputi:
1. Tipe Data Sederhana
merupakan tipe data dasar yang sering dipakai oleh program, meliputi: integer (bilangan bulat), real (bilangan pecahan), char (alphanumerik dan tanda baca), dan boolean (logika). Untuk data integer dan real masing-masing terbagi menjadi beberapa kategori
a. Bilangan Integer
merupakan tipe data berupa bilangan bulat, terbagi atas beberapa kategori seperti
Contoh bilangan integer adalah: 34 6458 -90 0 1112 Penggolongan tipe data integer tersebut dimaksudkan untuk membatasi alokasi memori yang dibutuhkan misalkan untuk suatu perhitungan dari suatu variabel bilangan diperkirakan nilai maksimumnya 32767 kita cukup mendeklarasikan variabel bilangan sebagai integer (2 byte), daripada sebagai longint(4 byte). Di dalam kompilernya, Pascal menyediakan konstanta untuk bilangan Integer yaitu: MaxInt and MaxLongInt, pemrogram bisa menggunakannya di dalam programnya tanpa harus terlebih dahulu mendefinisikannya.
-MaxInt bernilai 32.767
-MaxLongint bernilai 2.147.483.647.
conto
b. Bilangan Real
Bilangan real atau nyata merupakan jenis bilangan pecahan, dapat dituliskan secara biasa atau model scientific . Contoh bilangan real: 34.265 -3.55 0.0 35.997E+11, dimana E merupakan simbol perpangkatan 10. Jadi 452.13 mempunyai nilai sama dengan 4.5213e2. Penggolongan tipe data bilangan real dapat dilihat pada tabel 2. Bilangan Real
h:
c. Char
Tipe data ini menyimpan karakter yang diketikkan dari keyboard, memiliki 266 macam yang terdapat dalam tabel ASCII (American Standard Code for Information Interchange). Contoh: 'a' 'B' '+', dsb. Yang perlu diingat bahwa dalam menuliskannya harus dengan memakai tanda kutip tunggal. Jenis data ini memerlukan alokasi memori sebesar 1(satu) byte untuk masing-masing data.
d. Tipe Data Boolean
merupakan tipe data logika, yang berisi dua kemungkinan nilai: TRUE (benar) atau FALSE (salah). Turbo Pascal for Windows memiliki tiga macam jenis ini yaitu: Boolean, WordBool, dan LongBool. Tipe boolean memakai memori paling kecil, sedangkan WordBool dan LongBool dipakai untuk menulis program yang sesuai dengan lingkungan Windows.
Tipe data yang disediakan oleh PASCAL meliputi:
1. Tipe Data Sederhana
merupakan tipe data dasar yang sering dipakai oleh program, meliputi: integer (bilangan bulat), real (bilangan pecahan), char (alphanumerik dan tanda baca), dan boolean (logika). Untuk data integer dan real masing-masing terbagi menjadi beberapa kategori
a. Bilangan Integer
merupakan tipe data berupa bilangan bulat, terbagi atas beberapa kategori seperti
Contoh bilangan integer adalah: 34 6458 -90 0 1112 Penggolongan tipe data integer tersebut dimaksudkan untuk membatasi alokasi memori yang dibutuhkan misalkan untuk suatu perhitungan dari suatu variabel bilangan diperkirakan nilai maksimumnya 32767 kita cukup mendeklarasikan variabel bilangan sebagai integer (2 byte), daripada sebagai longint(4 byte). Di dalam kompilernya, Pascal menyediakan konstanta untuk bilangan Integer yaitu: MaxInt and MaxLongInt, pemrogram bisa menggunakannya di dalam programnya tanpa harus terlebih dahulu mendefinisikannya.
-MaxInt bernilai 32.767
-MaxLongint bernilai 2.147.483.647.
conto
b. Bilangan Real
Bilangan real atau nyata merupakan jenis bilangan pecahan, dapat dituliskan secara biasa atau model scientific . Contoh bilangan real: 34.265 -3.55 0.0 35.997E+11, dimana E merupakan simbol perpangkatan 10. Jadi 452.13 mempunyai nilai sama dengan 4.5213e2. Penggolongan tipe data bilangan real dapat dilihat pada tabel 2. Bilangan Real
h:
c. Char
Tipe data ini menyimpan karakter yang diketikkan dari keyboard, memiliki 266 macam yang terdapat dalam tabel ASCII (American Standard Code for Information Interchange). Contoh: 'a' 'B' '+', dsb. Yang perlu diingat bahwa dalam menuliskannya harus dengan memakai tanda kutip tunggal. Jenis data ini memerlukan alokasi memori sebesar 1(satu) byte untuk masing-masing data.
d. Tipe Data Boolean
merupakan tipe data logika, yang berisi dua kemungkinan nilai: TRUE (benar) atau FALSE (salah). Turbo Pascal for Windows memiliki tiga macam jenis ini yaitu: Boolean, WordBool, dan LongBool. Tipe boolean memakai memori paling kecil, sedangkan WordBool dan LongBool dipakai untuk menulis program yang sesuai dengan lingkungan Windows.
Jumat, 29 Mei 2009
Di Ciptakannya Manusia
Kenapa Allah menciptakan manusia?
Apakah hikmah di ciptakan manusia?
Serta apa pula tujuan apa yang akan dikerjakan manusia di bumi ini?
pertanyaan inilah yang membuat pusing semua orang,mulai dari golongan aqidah tingkat atas sampai santri-santri yang mau bertafakur memikirkan keagungan dan ciptaan Allah SWT.
Dari sini bisa kita ambil kesimpulan bahwa akal pikiran manusia tidak bisa menganalisa atau berfikir apa yang di ciptakan Allah SWT di dunia ini,apalagi yang berkaitan dengan aqidah.karena aqidah berhubungan dengan gaib,berfikir dan belajar tafakur tentang gaib tanpa berpedoman pada firman Allah dan hadist rasullullah akan sesat.karena hal tersebut (gaib)sudah di luar panca indera manusia,bila tetap dipaksakan untuk berfikir hal tersebut tanpa adanya pedoman akan sesat.
Allahua'lam
Allah ta’ala berfirman :
“Dan apakah orang yang sudah mati kemudian dia Kami hidupkan dan Kami berikan kepadanya cahaya yang terang, yang dengan cahaya tersebut dia dapat berjalan di tengah-tengah masyarakat manusia, serupa dengan orang yang keadaannya berada dalam gelap gulita yang sekali-kali tidak dapat keluar dari padanya? Demikianlah Kami jadikan orang yang kafir itu memandang baik apa yang telah mereka kerjakan “
( QS. Al-An’am : 122).
dan mungkin pula akal pikiran kita mengelak dengan apa-apa yang kita lihat dan kita dengar bahwa Allah yang menciptakan ini semua,
Allah yang wahid,yang menguasai alam seisinya ini
Allah berfirman :“ Dan apakah tidak menjadi petunjuk bagi mereka, berapa banyak umat-umat sebelum mereka yang telah Kami binasakan sedangkan mereka sendiri berjalan di tempat-tempat kediaman mereka itu. Sesungguhnya pada yang demikian itu terdapat tanda-tanda (kekuasaan Tuhan). Maka apakah mereka tidak mendengarkan (memperhatikan) ?. Dan apakah mereka tidak memperhatikan, bahwasanya kami menghalau (awan yang mengandung) air ke bumi yang tandus, lalu Kami tumbuhkan dengan air hujan itu tanam-tanaman yang daripadanya (dapat) makan binatang-binatang ternak mereka dan mereka sendiri . Maka apakah mereka tidak memperhatikan ?”
(QS. As-Sajadah : 26-27).
jika kita telah tahu bahwa akal pikiran manuasia tidak bisa sendirian untuk mengetahui hikmah penciptaan manusia dan jin, maka wajib bagi kita untuk mempelajari hikmah diciptakannya manusia dan jin dari Al-Qur’an yang tidak ada kebathilan di dalamnya. Allah subhanahu wa ta’ala menjelaskan dalam Al-Qur’an hikmah diciptakannya jin dan manusia dalam firman-Nya :
“Dan tidaklah aku ciptakan jin dan manusia untuk beribadah kepada-Ku”
(QS. Adz-Dzariyat : 56).
di dalam ayat ini telah jelas,bisa di ambil kesimpulan bahwa Allah menciptakan jin dan manusia semata-mata hanya untuk menyembah kepada Allah SWT.Ibadahlah yang merupakan berkah bagi jin dan manuasia. Oleh karenanya di utusnya para rasul turun ke dunia untuk menjelaskan mana yang halal dan mana yang haram,untuk menguji ketaqwaan manusia kepada Alla.Di sediakan nya surga dan neraka.bagi siapa yang mau mengikuti dan menjalankan apa yang di perintah oleh Allah SWT maka surga lah balasnnya dan apabila lari dari jalan Allah maka nerakalah tempatnya.Allah berfirman
(Dia-lah) yang menjadikan kematian dan kehidupan, supaya Dia menguji kamu, siapa di antara kamu yang paling baik amalannya. Dan Dia Maha Perkasa lagi Maha Pengampun.
(QS. Al-Mulk : 2).
Allah Subhanahu Wa Ta’ala menciptakan hamba-hamba-Nya dan mengeluarkan mereka kedunia ini. Lalu mengabarkan kepada mereka bahwa mereka akan berpindah ke alam lain. Dan Allah memerintahkan mereka serta melarang mereka dan menguji mereka dengan berbagai macam syahwat yang menentang perintah serta larangan-Nya. Maka barang siapa yang tunduk kepada perintah Allah, Allah akan memberikan balasan yang terbaik kepadanya di negeri akherat, dan barang siapa yang cenderung (menuruti) hawa nafsunya dan membuang perintah-perintah Allah serta melakukan larangan-Nya, maka baginya adalah sejelek-jelek balasan. (Lihat Tafsir As-Sa’di Juz 5 hal. 429).
melihat firman di atas bahwa semua hamba Allah itu di serukan untuk beribadah,di sertai ujian kepada mereka seprti ujian untuk jin dan manusia adalah hawa nafsu,syahwat duniawi.
namun diantara mereka (makhluk ciptaan Allah)di ciptakan tanpa mendapatkan ujian dari Allah seperti malaikat,kerjaan malaikat hanya beribadah kepada Allah tanpa mempunya hawa nafsu,Allah berfirman
“Dan mereka berkata : “Tuhan Yang Maha Pemurah telah mengambil (mempunyai) anak”. Maha Suci Allah. Sebenarnya (malaikat-malaikat itu adalah hamba-hamba yang di muliakan). Mereka itu tidak mendahului-Nya dengan perkataan dan mereka mengerjakan perintah-perintah-Nya. Allah mengetahui segala sesuatu yang di hadapan mereka (malaikat) dan yang dibelakang mereka, dan mereka tidak memberi syafaat melainkan kepada orang yang diridhoi Allah, dan mereka itu selalu berhati-hati karena takut kepada-Nya.”
(QS. Al-Anbiya’ : 26-28).
dengan demikian telah jelas bahwa diciptakannya jin dan manusia adalah hanya untuk beribadah dan mengabdi pada Allah,
barang siapa terlena atas nikmat dunia saja,saat itu juga dia ambil kesenangan itu,tapi sengsara di akheratnya
sebaliknya barang siapa menahan diri,mau manjalankan semua apa yang diperintahkan Allah dan meninggalkan apa yang di larang Allah maka di ekherat akan mendapatkan balasan nya yaitu kebahagiaan di akherat,surgalah yang akan di dapatkan.Allahua'alam
“Sesungguhnya orang-orang yang tidak mengharapkan (tidak percaya akan) pertemuan dengan Kami, dan merasa puas dengan kehidupan dunia serta merasa tentram dengan kehidupan itu dan orang-orang yang melalaikankan ayat-ayat Kami, mereka itu tempatnya ialah neraka, disebabkan apa yang mereka selalu kerjakan. Sesungguhnya orang-orang beriman dan mengerjakan amal-amal shaleh, mereka diberi petunjuk oleh Tuhan mereka karena keimanannya, di bawah mereka mengalir sungai-sungai di dalamn surga yang penuh kenikmatan. Do’a mereka di dalamnya ialah : “Salam”. Dan penutup do’a mereka ialah : “Alhamdulilaahi Rabbil ‘aalamin”. (QS. Yunus : 7-10).
Ya Allah Lindungilah Aku
ALLAH memberi kita nikmat,tetapi kita harus berusaha untuk mendapatkannya.Demikian juga jika kita terus menerus menunggu waktu yang tepat,mungkin kita tidak akan pernah mendapatkannya.
Mulailah sekarang untuk segera mendapatkan nya…mulailah di mana kita berada sekarang dengan apa adanya.Jangan berfikiran kenapa kita memilih seseorang untuk dicintai,tapi sadarilah bahwa dengan cinta kita akan bahagia.
Buka mata kitalebar-lebar sebelum memilih,dan biarkan mata kita terpejam,memilih wanita atau pria karena kecantikannya atau ketampanannya sama seperti membeli rumah karena lapisan catnya.Harta yang paling berharga bagi seorang pria di dunia ini adalah…. hati seorang wanita.
Begitu juga Persahabatan...persahabatan adalah 1 jiwa dalam 2 raga.Persahabatan sejati layaknya kesehatan, nilainya baru kita sadari setelah kita kehilangannya. Sahabat adalah yang dapat mendengarkan keluh kesah kita dan berusaha membantu untuk menyelesaikan nya dengan sepenuh hati tanpa mangharapkan suatu balasan.
kadang ada sahabat yang hanya mencari kita ketika dia memang butuh, dan ketika sudah memiliki sahabat yang lain kita langsung di lupakan. apa mungkin itu arti persahabatan ?
kalau mau bersahabat yang benar, carilah orang yang terus menerus bersama kita memberi manfaat sampai di hari kemudian (prof. dr. m. quraish shihab)
Jangan pernah menyesal untuk bertemu dengan orang lain.Tapi menyesallah jika orang menyesal bertemu dengan kita.Bertemanlah pada orang yang berprinsip,dialah hiasan dikala kita senang dan perisai diwaktu kita susah.Semua manusia itu baik kalau kamu bisa melihat kebaikannya dan menyenangkan kalau kamu bisa melihat keunikannya tapi semua manusia itu akan buruk dan membosankan kalau kamu tidak bisa melihat keduanya.
orang pintar bisa gagal karena ia memikirkan terlalu banyak hal, sedangkan orang bodoh sering kali berhasil dengan melakukan tindakan tepat.
Tak seorang pun sempurna,Semua orang pasti melakukan kesalahan.
mereka yang mau belajar dari kesalahan adalah orang yang besar,kita tak bisa mengubah masa lalu….
Tetapi dapat menghancurkan masa kini dengan mengkhawatirkan masa depan.Bila kita mengisi hati dengan penyesalan untuk masa lalu dan kekhawatiran untuk masa depan,maka kita tak memiliki hari ini untuk di syukuri.
Jika kita berpikir tentang hari kemarin tanpa rasa penyesalan dan hari esok tanpa rasa takut,berarti kita sudah berada di jalan menuju kesuksesan yang besar.
Cerita ini mungkin bisa menggugah kita betapa penting&berperannya sahabat dalam kehidupan ini...
***
"Minal aidzin wal faidzin, met idul fitri 1429 H.
"Sama-sama," Nisa menjawab.
"Apa kabar,"Dhanar menyambung percakapan.
"Baik,kamu!,"jawabnya singkat.
Obrolan demi obrolan terjadi antara mereka dengan cuaca yang sedikit mendung,muka yang tersenyum bak bulan sabit Dhanar mencoba menghidupkan suasana disiang itu,cuaca dingin menemani mereka berdua.Dengan langkah yang sedikit gontai Dhanar mencoba mendekatkan diri pada Nisa.
"Nisa lagi sibuk apa sekarang,''Dhanar mulai bertanya lagi.
"Ini mempersiapkan kuliah aja,Dhanar sendiri sudah mulai kerja ya?,"tanya Nisa.
"Iya nie sudah mulai masuk,tanggal enam kemarin,"Nisa,boleh ndak aq bertanya?,"dengan sedikit muka memerah Dhanar bertanya lagi.
"boleh silahkan saja,tidak apa-apa kok.
"mau tanya apa Dhanar,''nisa penasaran.
"Begini,aq sebenernya malu mengungkapkan ini semua.
ini masalah pribadi diriku,aku bingung,strees,shok tidak tahu harus berbuat apa,''dhanar sedikit menjelaskan
suasana di siang itu berubah menjadi hening seketika,ada raut muka sedih pada diri Dhanar,Nisa juga terlihat penasaran sekali.
"Dhanar ada apa sebenarnya,ceritalah!
siapa tau aku bisa bantu,"Nisa mencoba menenangkan keadaan.
"Begini masalahku ini membuat aku beban moral,psikologiku kena,kejiwaanku juga kena.
pikiranku buntu,aku butuh orang yang bisa membantuku untuk mengatasi masalah ini.
.....
***
"sakit banget rasanya Nis,''Dhanar menjelaskan keadaan dirinya.
"iya aku tau apa yang kamu rasakan sekarang,tapi kamu tidak boleh menyerah.
ingat!kita masih muda masih panjang harapan kita,masih banyak lagi orang-orang yang akan
membutuhkan kita.aku mohon kamu jangan bersedih lagi ya!kamu harus semangat,harus
melupakan masalah itu semua,keluargamu masih sangat membutuhkanmu.
cita-citamu masih panjang,aku selalu mendukungmu,jangan sedih lagi ya,''Nisa berusaha menghibur Dhanar yang matanya sudah dipenuhi dengan air mata.
"iya Nis,tapi berat sekali rasanya.
"kayaknya aku tidak sanggup lagi,"Dhanar mengeluh.
dengan segala kemampunnya Nisa berusaha menghibur Dhanar yang sedari tadi menangis
"janganalah menangis gitu,masih banyak lagi kok yang sayank padamu.kalau nangis gitu mah
kecil.
menangislah karena dosamu,aku ndak mau melihatmu menangis begini.aku ingin melihatmu selalu tersenyum,selalu bahagia.
masih banyak orang yang membutuhkanmu,kamu harus tabah ya,"Nisa menenangkan.
''kak cakep dech,''nisa menyeloteh tiba-tiba.
"yah Nisa ini,la orang hitam gini di bilang dakep,''Nisa becanda ah
"hehehe...tapi kalau dilihat dari dalam sedotan,hehehe...Nisa mencoba menghilangkan suasana sedih.
''Nisa ini,hehehe...''akhirnya tersenyumlah mereka berdua bersama-sama.
***
dengan menengok sedikit cerita di atas,betapa berperannya seorang sahabat pada kehidupan ini
saling tolong menolong,saling membutuhkan,saling mengingatkan untuk menuju kehidupan yang lebih baik.
manusia tidak dapat hidup sendiri (manusia sosial)
Langganan:
Postingan (Atom)
