#2: LARIK DINAMIS (DYNAMIC ARRAY)
Salah satu fitur bahasa pemrograman modern adalah keleluasan dalam menentukan besar memori yg digunakan dalam program dengan cara yg mudah dan (semi-)otomatis. Contohnya adalah penggunaan deret dinamis, yaitu deret yg panjangnya bisa berubah saat program sedang bekerja (runtime). Turbo Pascal sebagai bahasa Pascal jadul tentu tidak bisa melakukan hal ini, kecuali dengan cara-cara yg rumit dan tidak elegan.Dalam Turbo Pascal, ukuran sebuah deret harus ditentukan di awal program dan tidak bisa diubah lagi setelah program bekerja. Sekali kita deklarasikan sebuah deret dengan panjang 10 elemen, maka Turbo Pascal akan menggunakan memori sebesar 10 elemen tersebut. Berikut contoh kode programnya dalam Turbo Pascal:
Tidak itu saja, panjang deret dinamis bisa juga ditentukan melalui masukan dari pengguna atau dari parameter program atau dari sumber masukan lainnya. Deret dinamis sangat fleksibel. Dalam gambar terlampir berikut, saya tunjukkan contoh kode program untuk mengatur deret dinamis melalui masukan dari pengguna. Silakan dipelajari.
Selamat mencoba dan "Say NO to Turbo Pascal!" ????
Sumber: tulisan Pak Lebah di facebook group Pascal Indonesia
note: Tulisan berseri tentang apa yang tidak bisa dilakukan Turbo Pascal: - Seri 1 - Seri 3 - Seri 4
var a: array [0..9] of byte;Yg artinya sebuah peubah (variable) bernama a berupa deret bita (byte) sepanjang 10 elemen dengan nomor indeks 0 hingga 9. Maka sepanjang program bekerja, peubah a tersebut akan selalu berisi 10 elemen, tidak bisa lebih, tidak bisa kurang. Jika program butuh deret yg ukurannya bermacam-macam, maka kita harus mengatur panjang deret semaksimal mungkin walaupun belum tentu semuanya akan digunakan. Jadi boros memori komputer. Walaupun keterbatasan ini bisa "diakali" dengan trik pointer yg agak rumit, namun secara bahasa tetap tidak bisa dilakukan. Trik pointer itu selain rumit juga punya resiko jika tidak dilakukan dengan hati-hati. Misalnya bisa jadi jalan masuk untuk meretas program atau bahkan sistem operasi komputer. Dalam Pascal modern, seperti Free Pascal dan Delphi, deret dinamis bisa dilakukan dengan sangat mudah. Deret dinamis tidak perlu angka dalam kurung kurawal dan untuk mengatur panjang deret cukup dengan perintah setLength() saja. Berikut contohnya:
var a: array of byte; ? setLength(a, 10); ? setLength(a, 100); ?Yg artinya sebuah peubah bernama a berupa deret bita dinamis. Di bagian kode selanjutnya, perintah setLength(a,10); artinya mengatur deret a agar memiliki panjang 10 elemen dengan nomor indeks 0 hingga 9. Kode selanjutnya, perintah setLength(a,100); artinya mengatur deret a agar memiliki panjang 100 elemen dengan nomor indeks 0 hingga 99, dari yg semula berisi 10 elemen. Demikian seterusnya, panjang deret a bisa diubah sesuai kebutuhan program yg kita buat. Cukup mudah bukan?
Tidak itu saja, panjang deret dinamis bisa juga ditentukan melalui masukan dari pengguna atau dari parameter program atau dari sumber masukan lainnya. Deret dinamis sangat fleksibel. Dalam gambar terlampir berikut, saya tunjukkan contoh kode program untuk mengatur deret dinamis melalui masukan dari pengguna. Silakan dipelajari.
Selamat mencoba dan "Say NO to Turbo Pascal!" ????
Sumber: tulisan Pak Lebah di facebook group Pascal Indonesia
note: Tulisan berseri tentang apa yang tidak bisa dilakukan Turbo Pascal: - Seri 1 - Seri 3 - Seri 4
Random Articles
- Aplikasi Modern Dengan Bahasa Pascal
- Form yang FullScreen
- TINGGALKAN TURBO PASCAL!
- Membuat kontrol db aware
- Referensi Pemrograman Bahasa Pascal dari Tim Pembina TOKI
- Mendapatkan Direktori/Path dari suatu aplikasi
- Menjalankan Aplikasi trial untuk 1 kali jalan
- KADao, native DAO component for Delphi
- Buat Program aplikasi Trial dengan Registry
- Ngoding Pascal di REPL.IT
Last Articles
Recent Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 5 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 5 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 13 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 13 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 13 years ago