Page 92 - Modul Daskom 2020

Modul 4 – Interface, File dan Kursor 2020

Kemudian cobalah contoh di bawah ini :

Tabel 4.4 Notepad
Isi file memo.txt
PT. OASI UNIVERSE

Contoh pengunaanya pada tabel di bawah ini :
Tabel 4.5 Pembukaan
Pseudocode Source code
Program pembukaan Program pembukaan;
{Program ini digunakan untuk pembukaan file}

Deklarasi Var
Berkasteks:text Berkasteks:text;

Deskripsi Algoritma
Mulai Begin
Penamaan(berkasteks,’memo.txt’) Assign(berkasteks,’memo.txt’);
Pembukaan(berkasteks) Reset(berkasteks);
Selesai End .

▪ Pembacaan
Untuk jenis teks, file yang dibuka dengan prosedur reset bisa dibaca menggunakan sintaks
read atau readln. Proses pembacaan dilakukan seolah-olah ada pengguna yang mengetikkan
suatu masukkan melalui keyboard. Pembacaan dari file dengan sintaks read atau readln terlebih
dahulu menuliskan nama (logis) dari file yang hendak dibaca sebelum menuliskan nama
variabel yang menampung hasil pembacaan tersebut dengan menggunakan tanda koma
sebagai pemisah.
Berikut ini adalah format penulisannya :

Readln(nama_logis,’nama_variabel’);

Contoh pengunaannya pada tabel dibawah ini :
Tabel 4.6 Pembacaan
Pseudocode Source code
Program pembacaan Program pembacaan;
{Program ini digunakan untuk pembacaan file}

Deklarasi Var
Berkasteks:text Berkasteks:text;
Pesan:string pesan:string;

Deskripsi Algoritma Begin
Mulai Assign(berkasteks,’memo.txt’);
Penamaan(berkasteks,’memo.txt’) Reset(berkasteks); // buka file untuk dibaca
Pembukaan(berkasteks) Readln(berkasteks,pesan); //baca string dari
Baca(berkasteks,pesan) file
Tulis(pesan) Writeln(pesan); // tuliskan string yang
Selesai dibaca dari file pada layar
Readln ;
End .

Apabila isi file yang akan dibaca terdiri dari beberapa baris, maka pseudocode dan source code
yang digunakan sebagai berikut :

Praktikum Dasar Komputer & Pemrograman 2020 IV-90