Mengenal Prosedur Writeln dan Readln Bahasa PASCAL

Mengenal Prosedur Writeln dan Readln Bahasa PASCAL - Dalam bahasa pascal, prosedur yang digunakan untuk melakukan penulisan adalah Write dan Writeln. Perbedaan dari kedua buah prosedur ini hanyalah terdapat pada posisi kursornya. 

Pada prosedur Write kursor akan berada di belakang teks yang dituliskan. Sedangkan pada prosedur Writeln, setelah menuliskan teks maka posisi kursor akan dipindahkan ke baris berikutnya. Selanjutnya untuk proses pembacaan, bahasa Pascal memiliki prosedur Read, Readln dan ReadKey. Namun prosedur yang sering digunakan adalah Readln.

image source: jalannews.blogspot.com

baca juga: Struktur Program PASCAL dan Perintah Bahasa PASCAL

Komentar Program

Komentar program merupakan bagian program yang tidak ikut dieksekusi sehingga kehadirannya tidak mempengaruhi jalannya program. Pada umumnya bahasa Pascal hanya mendukung dua macam cara untuk membuat komentar program, yaitu:

1. Menggunakan tanda (*...*)
Komentar ini dapat digunakan untuk menuliskan komentar yang banyaknya lebih dari satu baris.

Contoh:

• (* Ini adalah komentar program yang banyaknya satu baris*)
• (* Ini juga merupakan komentar program dengan banyak baris lebih dari satu*)

2. Menggunakan tanda {...}
Komentar ini lebih sering digunakan oleh para programmer Pascal karena lebih singkat dan sederhana.

Contoh:

• { Ini adalah komentar program yang banyaknya satu baris}
• { Ini juga merupakan komentar program dengan banyak baris lebih dari satu}

Reserved Word

Reserved Word adalah kata-kata baku yang digunakan dalam program dan sudah terintergrasi dalam pascal dan juga mempunyai bentuk serta kegunaan tertentu yang telah didefinisikan oleh Pascal.

Reserved Word tidak boleh didefinisikan kembali oleh pemakai, sehingga tidak dapat digunakan sebagai pengenal (Identifier). Dalam bahasa pemrograman Pascal, beberapa

Reserved Word dalam Pascal antara lain:

AND	DOWNTO	IN	OF	STRING	ASM
OR	INHERITED	THEN	ARRAY	END
TO	BEGIN	EXPORTS	INTERFACE	PROCEDURE	TYPE
FILE	LABEL	PROGRAM	UNIT	CONST	FOR
NIL	RECORD	REPEAT	FUNCTION	CONSTRUCTOR	MOD
GOTO	DESTRUCTOR	LIBRARY	SET	VAR	DIV
ELSE	PACKED	CASE	UNTIL	USES	IF
NOT	SHL	WHILE	DO	IMPLEMENTATION
OBJECT	SHR	WITH	INLINE

Selain dari Reserved Word di atas, Turbo Pascal masih memiliki tambahan Reserved Word berikut:

ABSOLUTE           ASSEMBLER ()        FAR          FORWARD            INDEX

Statemen-statemen yang digunakan untuk pengaturan letak layar:

# ClrScr [prosedur].
Perintah ini digunakan untuk membersihkan layar.
sintaks: ClrScr; 􀃆[Clear screen]

# GotoXY[prosedur].
Untuk menempatkan posisi kursor pada layar.
Sintaks: GotoXY(X, Y: Byte);
Keterangan : X = sumbu X (posisi horisontal)
Y = sumbu Y (posisi vertikal)

# DelLine [prosedur].
Untuk menghapus sebuah baris pada posisi kursor dan menaikkan baris-baris dibawahnya.
Sintaks: DelLine;

# InsLine [prosedur].
Untuk menyisipkan sebuah baris pada posisi kursor dan menggeser kebawah tampilan-tampilan baris dibawahnya.
Sintaks: InsLine;

Statemen yang digunakan untuk memanipulasi string:

# ConCat[fungsi].
Untuk menggabungkan 2 atau beberapa variabel string.
Sintaks: ConCat (s1 [,s2,...,sn]: String) : String;
contoh: ConCat ('ABC','DEF') { ABCDEF }

# Copy [fungsi].
Mengambil satu atau beberapa karakter dari sebuah string.
Sintaks: Copy (S,Index,Count) : String;
Keterangan :

• S = sebuah string (string). 
• Index = posisi awal kita akan mengambil beberapa karakter (integer) 
• Count = banyaknya karakter yang akan diambil (integer). 

# Delete [prosedur].
Menghapus sebagian karakter dari sebuah string.
Sintaks: Delete (S,Index,Count);
Keterangan : sama dengan statemen Copy.

# Insert [prosedur].
Menyisipkan satu atau beberapa karakter ke dalam sebuah string.
Sintaks: Insert (Source,var S,Index);
Keterangan : 

• Source = sumber string untuk disisipi (string) 
• var S = string tujuan yang akan disisipi oleh string Source (string) 
• Index = posisi mulai (integer). 

# Length [fungsi].
Memberikan nilai panjang dari suatu string (jumlah karakter dalam string).
Sintaks: Length (S);
Keterangan : 

• S = string 
• Length(S) menghasilkan nilai integer. 

# Pos [fungsi].
Mencari posisi sebuah bagian string (substring) didalam sebuah string.
Sintaks: Pos (Substr,S); {menghasilkan nilai Byte}
Keterangan : 

• Substr = substring yang akan dicari posisinya di dalam sebuah string S. 
• Bila bernilai 0 berarti nilai string yang dicari tidak ada. 

# Str [prosedur].
Merubah nilai numerik ke dalam nilai string.
Sintaks: Str (N,S);
Keterangan :

• N = data tipe integer, 
• S = data tipe string. 

# Val [prosedur].
Merubah nilai string ke dalam nilai numerik.
Sintaks: Val (S,N,P);
Keterangan :

• S = nilai string, 
• N = nilai real, 
• P = posisi salah. 
• Nilai string harus berisi angka, plus atau minus, bila tidak berarti kesalahan dan letak kesalahannya ditunjukkan oleh variabel posisi salah. Jika benar, maka nilai variabel tsb = 0 (nol). 

# UpCase [fungsi].
Memberikan huruf kapital dari argumen.
Sintaks: UpCase (S);
Keterangan :

• S = variabel bertipe karakter. 

Sekian artikel Modul Makalah tentang Mengenal Prosedur Writeln dan Readln Bahasa PASCAL.

Daftar Pustaka

• Jogiyanto, Konsep Dasar Pemrograman Bahasa PASCAL, Andi Offset, Yogyakarta, 1993
• Rinaldi Munir, Algoritma & Pemrograman Dalam Bahasa Pascal dan C, Informatika Bandung, 2007.