===== Jangan pernah meremehkan dirimu. Tuhan memberikanmu hidup bukan kerena kamu membutuhkannya, tapi karena seseorang membutuhkanmu ===== Bagi semua pengunjung, saya minta do'anya untuk dimudahkan dan dilancarkan skripsiku ===== Makasih =====

PERCABANGAN PADA PASCAL

Apa yang anda ketahui tentang percabangan pada pascal?
Kita tahu, percabangan ini serasi dengan kata mendua, dan kita juga tahu kata mendua dihadapkan pada dua pilihan yang berbeda, itu pun seperti halnya percabangan itu sendiri. Percabangan juga dihadapkan pada beberapa pilihan yang berbeda, dan harus dipilih salah satu. Jadi pada pascal, percabangan  adalah suatu operator yang digunakan untuk menentukan pilihan terhadap beberapa pilihan yang ada.
Pada pascal ada beberapa script atau code yang digunakan untuk menjalankan suatu percabangan, seperti struktur if-then, struktur if-then-else, struktur case-of, dan struktur case-of-else. Secara mendasar terdapat dua struktur pernyataan percabangan didalam bahasa pemrogramman pascal, yaitu pernyataan if dan pernyataan case ..of. Pernyataan-pernyataan tersebut digunakan untuk menangani percabangan atau memilih suatu statement yang berdasarkan suatu syarat. Syarat ini harus terpenuhi jika akan melakukan penyeleksian yang diinginkan.
Masing-masing memiliki kelebihan dan kekurangan, seperti pada struktur case..of itu memiliki kelebihan dibanding struktur if, yakni struktur script atau codenya lebih ringkas dibanding pada struktur if. Tetapi struktur case..of juga memiliki kekurangan yakni tidak dapat menjalankan percabangan didalam percabangan seperti halnya yang dapat dilakukan oleh struktur if.


 STRUKTUR PERCABANGAN
 
Struktur percabangan ada beberapa macam, antara lain struktur if-then, struktur if-then-else, struktur case-of, dan struktur case-of-else. Setiap struktur memiliki perbedaan seperti yang telah dijeleskan sebelumnya. Jika ada pertanyaan seperti:
Bagaimana cara menerapkan struktur percabangan pada pascal?
Ada beberapa cara, yakni sebagai berikut:
 
>> PENERAPAN STRUKTUR IF-THEN
Statemen IF-THEN digunakan untuk menyeleksi suatu kondisi, jika kondisi yang diseleksi terpenuhi, maka statemen yang mengikuti THEN akan diproses. Tetapi, apabila kondisi tidak terpenuhi, maka yang akan diproses adalah statemen berikutnya.
Bentuk umum:






Contoh program:

Hasil eksekusi dari program:
                                               Contoh 1                                               Contoh 2  

>> PENERAPAN STRUKTUR IF-THEN-ELSE
Statemen IF-THEN…ELSE digunakan untuk menyeleksi suatu kondisi. Statemen 1 akan diproses jika kondisi yang diseleksi benar, sedangkan statemen 2 akan diproses jika kondisi yang diseleksi tidak terpenuhi.
Bentuk umum:








Contoh program:

Hasil eksekusi program:
Contoh 1

Contoh 2


>> PENERAPAN STRUKTUR CASE-OF
Statemen CASE-OF digunakan untuk memilih jika terdapat lebih dari dua kondisi yang setiapnya memerlukan penanganan yang berbeda.
Bentuk  umum:









Contoh program:

Hasil eksekusi program:
Contoh 1

Contoh 2

Contoh 3


>> PENERAPAN STRUKTUR CASE-OF-ELSE
Struktur CASE-OF…ELSE merupakan pengembangan dari struktur CASE-OF dan juga merupakan pengembangan dari standar Pascal. Pada struktur CASE-OF bila tidak ada kondisi yang terpenuhi berarti tidak ada statemen di dalam lingkungan CASE-OF yang diproses. Dengan struktur CASE-OF…ELSE, bila tidak ada kondisi yang terpenuhi, maka statemen yang akan diproses dalam lingkungan CASE-OF adalah statemen yang ada di ELSE.
Bentuk umum:











Contoh program:

Hasil eksekusi program:

Contoh 1


Contoh 2


KEUNGGULAN STRUKTUR IF DAN STRUKTUR CASE
Unggul yang mana antara struktur if dengan struktur case.? 
Sebenarnya kalau dikatakan unggul, keduanya sama-sama unggul. Karena struktur case memiliki kelebihan dari pada struktur if, dan struktur if pun memiliki kelebihan dari pada struktur case.
Kelebihan statemen case terletak pada struktur script atau codenya yang lebih ringkas dibandingkan dengan struktur pada if.
Sedangkan kelebihan statemen if yaitu struktur if dapat menyelesaikan hampir seluruh permasalahan pada pascal, sedang case tidak bisa.
Mengapa statemen if dapat menyelesaikan hampir semua masalah pada pascal, sedangkan statemen case tidak bisa?
Karena pada statemen if dapat menjalankan suatu percabangan didalam percabangan yang disebut juga dengan istilah if bersarang, dan pada statemen case tidak ada hal yang seperti itu.

>> PERCABANGAN DIDALAM PERCABANGAN
Bagaimana penerapan if bersarang pada pascal?
Dan seperti apa hasilnya?
Penerapan if bersarang atau yang sering disebut juga dengan percabangan berantai ini sebenarnya sama seperti statemen if pada umumnya, hanya saja ada tambahan percabangan lagi setelah percabangan yang sebelumnya.
Bentuk umum:

















Contoh program:

 Hasil eksekusi program:
Contoh 1

Contoh 2



Sepertinya cukup itu saja yang dapat saya jeleskan tentang PERCABANGAN PADA PASCAL.
kalau ada beberapa kritik, saran, atau pertanyaan dapat langsung komen di kolom komentar.

Terimakasih, semoga tambah menguasai pascal ya sobat.... ^_^




15 comments:

  1. saya masih kelas 1 smk dan di kelas saya sedang mempelajari tentang percabangan dalam pascal,,,,, terimakasih info ini cukup membantu tapi saya masih sedikit kurang memahaminya,,, bisa di jelaskan secara rinci lagi gak dengan bahasa yang mudah di pahami,,,, maaf merepotkan anda

    ReplyDelete
    Replies
    1. Kalau dijelaskan secara terperinci itu panjang banget, mendingan kamu cari soal tentang percabangan pascal ini, nanti yang masih bingung tanyakan saya. insya'allah akan saya bantu.
      Belajar dari soal2 itu lebih cepat paham dari pada belajar dari sebuah teori.
      Karena teknik belajarku begitu. :-bd

      Delete
    2. Oh iya kalau mau coba2 ajar pascal, ini juga cocok. langsung kunjungi saja
      http://www.slideshare.net/rey25/kumpulan-contohprogrampascal

      Delete
  2. Mengingat kembali, terima kasih!

    ReplyDelete
  3. Mengingat kembali, terima kasih!

    ReplyDelete
  4. bagaimana cara membuat pascal gabungan 3 rumus bangun ruang menggunakan if then tanpa else

    ReplyDelete
    Replies
    1. {
      ===================================================
      -- ARFA engkong Solusi --
      3 Rumus menghitung Volume bangun ruang.
      jawaban buat "Irwan Quraisy"
      ===================================================
      }
      program Volume_Bangun_Ruang; {ARFA engkong Solusi}
      uses crt;
      var volkubus: integer;
      rusuk: integer;
      volbalok: integer;
      P: integer;
      L: integer;
      T: integer;
      vollingkaran: real;
      jarijari: integer;
      begin
      clrscr;
      writeln('*** Menghitung Volume KUBUS ***');
      write('Masukan Panjang Rusuk : ');readln(rusuk);
      volkubus:=rusuk*rusuk*rusuk;
      writeln('Volume kubus adalah : ',volkubus);
      readln;
      writeln;
      writeln('*** Menghitung Volume BALOK ***');
      write('Masukan Panjang Balok : ');readln(P);
      write('Masukan Lebar Balok : ');readln(L);
      write('Masukan Tinggi Balok : ');readln(T);
      volbalok:=P*L*T;
      writeln('Volume Balok adalah : ',volbalok);
      readln;
      writeln;
      writeln('*** Menghitung Volume LINGKARAN ***');
      write('Masukan Panjang Jari-Jari : ');readln(jarijari);
      vollingkaran:=4.19*jarijari*jarijari*jarijari;
      {
      4.19 didapat dari (4/3 x 3.14) karena rumus
      volume lingkaran = 4/3 x 3.14 x jari2 x jari2 x jari2
      }
      writeln('Volume kubus adalah : ',vollingkaran);
      readln;
      end.

      Delete
  5. maaf mau tanya..
    apa perbedaan if bersarang dan if bertingkat?
    terima kasih

    ReplyDelete
    Replies
    1. IF bertingkat itu seperti apa ya, aku malah baru denger.
      kalau IF bersarang disini aku sebut juga percabangan didalam percabangan.

      Delete
  6. mas mau tanya kalo contoh program yg pake if, procedur, case n array ada gx ya??

    ReplyDelete
    Replies
    1. Sepertinya ada, coba di MENU "DOWNLOAD" (menu blog yang ada diatas itu) trus pilih yang ada namanya "ARRAY"...

      Delete
  7. sangat membantu artikelnya :) #-o #-o #-o
    Blog

    ReplyDelete
  8. mas ada nggak contoh pemrograman data mahasiswa dengan sistem pengulangan dan percabangan?? saya masih kebingungan mencari tutornya. Trims

    Bisa kirim via email ke idrusrezatkj@gmail.com

    ReplyDelete
  9. terima kasih artikelnya sangat bermanfaat
    https://www.barisan.info/

    ReplyDelete
:) :( ;) :D ;;-) :-/ :x :P :-* =(( :-O X( :7 B-) :-S #:-S 7:) :(( :)) :| /:) =)) O:-) :-B =; :-c :)] ~X( :-h :-t 8-7 I-) 8-| L-) :-a :-$ [-( :O) 8-} 2:-P (:| =P~ #-o =D7 :-SS @-) :^o :-w 7:P 2):) X_X :!! \m/ :-q :-bd ^#(^ :ar!