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!!!'.
Dalam tutorial kali ini kita telah membahas pengertian dan cara penggunaan operator perbandingan di dalam pascal. Berikutnya, saya akan membahas operator logika Pascal.
Thanks atas postingan nya
sangat bermanfaat.
Tolong di lanjut ya gan….
Siip, ditunggu saja y gan…
mohon di lanjurkan bang…
Siap, ditunggu saja y gan, berhubung sedang ada kerjaan lain untuk saat ini :)
ditunggu tutor slanjutnya om, btw untuk pembahasan Function sama Procedure blom ada tuh om
pelanggan setia nih master.. saya tunggu kelanjutannya :)
Makasih atas sodaqoh ilmunya boss.., semoga bernilai ibadah.
BTW. Operator logikanya ditunggu..
Hehe, siap… :)
Kapan pembahasan selanjutnya min?
Hehe, ditunggu saja y gan, kebetulan saat ini masih fokus ke pembuatan eBook PHP Uncover Duniailkom…
sore mimin, kapan nih lanjut pascal? ebook nya dah jadi kan.perlu ngerti dasarnya dulu nih.xixixixi…
Maksudnya eBook Pascal y gan? mungkin masih agak lama nih, soalnya saya masih fokus ke web programming. Tp saya usahakan untuk menyambung tutorial pascal di duniailkom ini :)
ditunggu ya gan kelanjutan tutorial nya. membantu banget buat belajar dasar2 pemrograman
Siap gan, iya nih.. udah lama g sempat sambung tutorial Pascal lagi, hehe…
Terimakasih min. Sangat membantu untuk pelajar seperti saya. Ditunggu updatenya ;)
we want more! we want more! we want more! *ngangkat poster*
Hehe, ditunggu ya gan… :D
buat list tutorial untuk C++ juga dong gan..
hehehe :D
Siip, request di tampung y gan…