Home Download Link Pilihan Peta Situs Buku Tamu Email Me
seluruh yang ada di situs ini bebas untuk disebarluaskan selama menyertakan situs ini/sumber
Spesial Gempa Yogyakarta 27 Mei 2006 Klik di sini
 Tutorial 

 Windows -
   -> Registry
   -> Virus

 Linux -
   -> File Server
   -> Shell Scripting

 Pemrograman -
   -> Visual Basic
   -> Visual C++
   -> Java
   -> Pascal
   -> C / C++

 Web Design -
   -> HTML
   -> Javascript
   -> PHP
   -> ASP

 Lain-Lain -
   -> Konf/Instalasi
   -> Miscellaneous
   -> Gempa
   -> djChanger
 Lain - Lain 

 Interaktif
   -> Kirim Tutorial
   -> Forum Diskusi
   -> Blogger
   -> Ulas Web

Pascal
- by : dj/mideis -

Tutorial yang kedua ini akan dibahas mengenai pernyataan kondisi, if dan case.

1: Program Tutorial2_if;
2: var pilih: Integer;
3: Begin
4:   write('Pilih 1 atau 2'); readln(pilih);
5:   if pilih=1 then write('Anda memilih 1')
6:   elseif pilih=2 then write('Pilihan anda 2')
7:   else write('Anda memilih yang lain')
8: End.
Perhatikan baris 5, 6 dan 7. Di situ ada 3 pernyataan kondisi if. Apabila pilihan yang kita ketik ada di satu kondisi, maka yang lain akan diabaikan. Bingung? gini maksudnya... Misal pada program di atas kita pilih 2. Pada saat program dijalankan, baris ke-5 akan di eksekusi. Berhubung pilihan kita 2 bukan 1, maka akan langsung pindah kebaris selanjutnya. Ternyata pada baris ke-6 kondisi itu terpenuhi, maka yang tercetak dilayar adalah "Pilihan anda 2". Baris ke-7 tidak diperiksa lagi karena baris ke 6 sudah memenuhi syarat.

Bila kita memilih 3, maka baris ke-5 dan ke-6 tidak memenuhi konsisi tersebut, maka yang tercetak adalah "Anda memilih yang lain".

Selain dengan if, pernyataan kondisi di atas bisa juga menggunakan case. Perhatikan contoh:

 1: Program Tutorial2_case;
 2: var pilih: char;
 3: Begin
 4:   write('Pilih 1 atau 2'); readln(pilih);
 5:   case pilih of
 6:     '1': write('Anda memilih 1');
 7:     '2': write('Pilihan anda 2');
 8:   else write('Anda memilih yang lain');
 9:   end;
10: End.
Keterangannya gak jauh beda dengan kondisi if kok. Coba amati pada baris ke 9, di sana ada pernyataan "end;". Pernyataan itu berfungsi untuk menutup pernyataan case yang dimulai pada baris ke-5. Perlu diingat "end" disertai dengan titik hanya untuk diakhir program.

<< kembali 

Language:
indonesia english

Klik disini untuk login
%polling%
Kirim Tutorial
 

Untuk tampilan terbaik gunakan ie 4.0, Netscape 5.0 atau versi di atasnya dengan resolusi 1024 x 768
Bogor, 2005