1 / 10

TUMPukAN (STACK)

STRUKTUR DATA. TUMPukAN (STACK). Tumpukan adalah suatu kumpulan data yang seolah-olah ada data yang diletakkan di atas data lain.

regan-kline
Download Presentation

TUMPukAN (STACK)

An Image/Link below is provided (as is) to download presentation Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author. Content is provided to you AS IS for your information and personal use only. Download presentation by click this link. While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server. During download, if you can't get a presentation, the file might be deleted by the publisher.

E N D

Presentation Transcript

  1. Struktur Data - Gerlan A. Manu, ST.,MKom STRUKTUR DATA TUMPukAN (STACK)

  2. Tumpukan adalah suatu kumpulan data yang seolah-olah ada data yang diletakkan di atas data lain. Misalnya kita mempunyai dua buah kotak yang kita tumpuk, sehingga kotak kita letakkan di atass kotak yang lain. Jika kemudian tumpukan dua kotak itu kita tambah dengan kotak ketiga, keempat dan seterusnya maka akan kita peroleh sebuah tumpukan kotak, yang terdiri dari N kotak. Struktur Data - Gerlan A. Manu, ST.,MKom Pengertiantumpukan

  3. Struktur Data - Gerlan A. Manu, ST.,MKom IlustrasiTumpukan Tumpukan bisa diilustrasikan seperti gambar disamping. dari gambar kita bisa mengatakan bahwa kotak B ada diatas kotak A dan ada di bawah kotak C. menambahkan menghapus Dari gambar ini kita hanya bisa menambah atau mengambil sebuah kotak lewat satu ujung, yaitu ujung bagian atas. atas F E Dapat dilihat pula bahwa tumpukan merupakan kumpulan data yang sifatnya dinamis, artinya kita bisa menambah dan mengambil data darinya. D C B Dengan memperhatikan ilustrasi ini maka kita bisa melihat bahwa tumpukan merupakan suatu senarai (list) yang mem- punyai watak “masuk terakhir keluar pertama” atau disebut LIFO (Last In First Out). A

  4. Tumpukan = Kumpulan Data Array bisa digunakan untuk menyajikan tumpukan. Namun pada kumpulan data biasanya terdiri dari elemen-elemen yang bervariasi(dinamis), sedangkan untuk array elemennya statis. Untuk elemen yang dinamis bisa digunakan record. Struktur Data - Gerlan A. Manu, ST.,MKom Penyajiantumpukanpadapascal

  5. Const MaxElemen = 255; Type Tumpukan = record isi : array[1 .. MaxElemen] of Integer; atas : 0 .. MaxElemen end; Var T : Tumpukan; Struktur Data - Gerlan A. Manu, ST.,MKom Deklarasitumpukan Jika T.Atas = 5, berarti dalam tumpukan ada 5 elemen, yaitu T.isi[1],T.isi[2],….., T.isi[5]. Jika data yang diambil, maka nilai Medan T.Atas dikurangi 1 menjadi 4, yang berarti T.isi[4] adalah elemen teratas. Jika data ditambah maka nilai T.atas ditambah dengan 1 menjadi 6, sehingga T.isi[6] adalah elemen teratas. Dengandeklarasidiataskitamenganggapbahwaelementumpukan T, yang tersimpandalamlarikT.Isiadalahbertipe integer danbanyaknyaelementumpukanmaksimumadalahsebesarMaxElemen, yang dalamhalini 255 elemen. PadamedanAtas, nilainyamenunjukkanbanyaknyaelemen yang adadalamsuatutumpukan, yang sekaligusmenunjukkanposisielementeratasdalamtumpukan yang dimaksud.

  6. Ada dua operasi dasar yang bisa kita laksanakan pada sebuah tumpukan, yaitu • Operasi menyisipkan data, atau mem-push data. • Operasi menghapus data atau mem-plop data. • Karena dalam tumpukan kita bisa mempush data, maka tumpukan juga sering disebut pusdown list. Struktur Data - Gerlan A. Manu, ST.,MKom OperasiPadaTumpukan

  7. Procedure PUSH(var T : Tumpukan; X : integer); Begin T.Atas := T.Atas + 1; T.Isi[T.Atas] := X; End; Struktur Data - Gerlan A. Manu, ST.,MKom Operasi PUSH Procedure iniakanmenyisipkantempatuntuk x yang akandipushkedalamtumpukan, yaitudenganmenambahnilaimedanT.Atasdengan 1 dankemudianmenyisipkan x kedalamlarik T.isi. Dari procedure ini, masalahakantimbulsaatT.Atassamadengan Max Elemendanjikakitamempushlagimakaakanterjadioverflowpada array T.Isi, disebabkankarenadeklarasibanyaknyaelemen array tersebuttidakmencukupi. Sehingga procedure diatasberpudirubahmenjadi : Procedure PUSH (var T : Tumpukan; X : Integer); Begin If T.Atas = MaxElemen then writeLn (‘Tumpukan Sudah Penuh’) else begin T.Atas := T.Atas + 1; T.Isi[T.Atas] := x end End;

  8. Procedure POP (var T : Tumpukan); Begin if T.Atas = 0 then writeLn (‘Tumpukan Sudah Kosong’); else T.Atas := T.Atas -1 End; Struktur Data - Gerlan A. Manu, ST.,MKom OPERASI POP

  9. Contoh Program Untuk Membalikkan Kalimat. Dalam hal ini yang dibalik adalah seluruh kalimat bukan per kata. Input : BELAJAR PASCAL ADALAH MUDAH DAN MENYENANGKAN Output : NAKGNANEYNEM NAD HADUM HALADA LACSAP RAJALBE Struktur Data - Gerlan A. Manu, ST.,MKom ContohPemakaianTUmpukan

  10. Struktur Data - Gerlan A. Manu, ST.,MKom Uses wincrt; ConstElemen = 255; Type S255 = String[Elemen]; Tumpukan = record isi : s255; atas : 0..elemen end; Var T : Tumpukan; I : Integer; Kalimat : S255; Procedure Awalan(Var T : Tumpukan); Begin T.Atas := 0 End; Procedure PUSH (Var T : Tumpukan; X : char); Begin T.Atas := T.Atas + 1; T.Isi[T.Atas] := X End; Function POP (Var T : Tumpukan) : char; Begin POP := T.Isi[T.Atas]; T.Atas := T.Atas - 1; End; {Program Utama} Begin clrscr; Awalan(T); write ('Masukansembarangkalimat : '); ReadLn (Kalimat); WriteLn; { mempushkalimatkedalamtumpukan} For I := 1 to length(Kalimat) do PUSH(T, Kalimat[I]); {mempopisitumpukansehinggadiperolehkalimat yang dibacaterbalik} For I := 1 to length(Kalimat) do write(POP(T)); WriteLn; End.

More Related