Menyambung pembahasan tentang operator di bahasa pemrograman Pascal, kali ini saya akan membahas tentang jenis-jenis operator perbandingan atau operator relasional dalam Pascal.
Jenis-jenis Operator Perbandingan Pascal
Operator perbandingan umumnya digunakan dalam proses pengambilan keputusan atau percabangan program. Sebagai contoh, jika angka pertama lebih besar dari kedua, maka jalankan perintah ini. Atau jika string password = ‘r4h4sia’ maka berikan hak akses.
Di dalam pascal, terdapat 6 operator perbandingan:
| Operator | Penjelasan | Contoh |
|---|---|---|
| = | Sama dengan | 5 = 5 -> True |
| <> | Tidak sama dengan | 5 <> 5 -> False |
| > | Lebih besar | 5 > 6 -> False |
| < | Lebih kecil | 5 < 6 -> True |
| >= | Lebih besar atau sama dengan | 5 >= 3 -> True |
| <= | Lebih kecil atau sama dengan | 5 <= 5 -> True |
Operator perbandingan ini kadang disebut juga dengan operator relasional, karena kita membandingkan apa hubungan (relasi) sebuah variabel dengan variabel lainnya.
Cara Penggunaan Operator Perbandingan Pascal
Hasil dari operator perbandingan adalah data bertipe boolean, apakah itu TRUE atau FALSE. Mari kita lihat contoh penggunaannya:
program operator_perbandingan;
uses crt;
var
a,b:integer;
hasil:boolean;
begin
clrscr;
a:=6;
b:=8;
writeln('a = ',a);
writeln('b = ',b);
writeln;
hasil:= a = b;
writeln('a = b :',hasil);
hasil:= a <> b;
writeln('a <> b :',hasil);
hasil:= a > b;
writeln('a > b :',hasil);
hasil:= a < b;
writeln('a < b :',hasil);
hasil:= a >= b;
writeln('a >= b :',hasil);
hasil:= a <= b;
writeln('a <= b :',hasil);
readln;
end.
Dalam contoh kode program pascal diatas, saya membuat 2 buah variabel: a dan b. Variabel a bernilai 6, dan variabel b bernilai 8. Selanjutnya saya membandingkan kedua nilai ini. Dalam setiap perbandingan, hasilnya disimpan ke dalam variabel hasil.
Jika anda tidak bolos ketika mata pelajaran matematika di SD, tentunya bisa menebak apa hasil dari setiap operasi perbandingan di atas :)
Operasi perbandingan tidak hanya untuk tipe data angka saja, tapi juga bisa berbagai tipe data lain, seperti char. Berikut contohnya:
program operator_perbandingan;
uses crt;
var
a,b:char;
hasil:boolean;
begin
clrscr;
a:='X';
b:='Y';
writeln('a = ',a);
writeln('b = ',b);
writeln;
hasil:= a = b;
writeln('a = b :',hasil);
hasil:= a <> b;
writeln('a <> b :',hasil);
hasil:= a > b;
writeln('a > b :',hasil);
hasil:= a < b;
writeln('a < b :',hasil);
hasil:= a >= b;
writeln('a >= b :',hasil);
hasil:= a <= b;
writeln('a <= b :',hasil);
readln;
end.
Kali ini saya membandingkan karakter X dan Y. Untuk kasus seperti ini, operator perbandingan pascal akan membandingkan urutan setiap karakter dalam tabel ASCII. Di dalam tabel ASCII, karakter X lebih dulu muncul dari Y. Oleh karena itulah X dianggap lebih kecil daripada Y.
Seperti yang saya jelaskan diawal, operator perbandingan ini baru ‘berguna’ di dalam percabangan kode program, seperti struktur IF. Berikut contohnya:
program operator_perbandingan;
uses crt;
var
password,konf_pass:string;
hasil:boolean;
begin
clrscr;
password:='r4has1a';
konf_pass:='rahasia';
if password=konf_pass then
writeln('Access Granted')
else
writeln('Warning, Intruder!!!');
readln;
end.
Struktur logika IF THEN ELSE belum kita pelajari hingga saat ini. Tetapi anda mungkin sudah bisa menebak apa maksud kode program diatas.
Saya membuat sebuah variabel password dengan nilai string ‘r4has1a’. Kemudian saya membandingkan nilai ini dengan variabel konf_pass. Tampilan ‘Access Granted’ hanya akan ditampilkan jika variabel konf_pass juga berisi string ‘r4has1a’. Selain itu, password dianggap tidak cocok dan yang akan ditampilkan adalah: ‘Warning, Intruder!!!’.
Di dalam pascal, operator perbandingan ‘sama dengan’ menggunakan 1 tanda ‘sama dengan’ yakni tanda ‘=’. Di dalam bahasa pemrograman turunan C (seperti C++ dan PHP), kita menggunakan tanda ‘dua kali sama dengan’ yakni ‘==’. Tapi anda tidak perlu memusingkan hal ini :)
Dalam tutorial kali ini kita telah membahas pengertian dan cara penggunaan operator perbandingan di dalam pascal. Berikutnya, saya akan membahas operator logika Pascal.
Sumber wk.com
EmoticonEmoticon