Selasa, 20 Januari 2015
Pernyataan CASE-OF biasanya dipakai pada permasalahan ganda. Karena pada pernyataan CASE-OF lebih jelas dan lebih mudah untuk dipahami serta lebih cepat pembuatannya daripada menggunakan pernyataan IF-THEN-ELSE.
Bentuk umumnya adalah:
| CASE nilai OF
Daftar_nilai1: pernyataan_1;
Daftar_nilai2: pernyataan_2;
… … … …
Daftar_nilaim: pernyataan_m;
ELSE
Pernyataan_n
END
|
Pada bentuk umum pernyataan CASE-OF diatas:
- Nilai dapat berupa tipe char, byte dan Boolean.
- Daftar_nilai dapat berupa satu atau beberapa konstanta.
Contoh programnya adalah:
- a) Algoritma:
Algoritma menu makanan harian
DEKLARASI
Hari : integer
DESKRIPSI
Read (hari)
CASE hari OF
Hari = senin : write(‘menu ayam bakar’)
Hari = selasa : write(‘menu ikan goreng’)
Hari = rabu : write(‘menu dendeng’)
Hari = kamis : write(‘menu gulai kambing’)
Hari = jumat : write(‘menu ayam gulai’)
Hari = sabtu : write(‘menu sup buntut’)
Hari = minggu : write(‘menu gado-gado’)
Otherwise write (‘nama hari yang anda masukan salah’)
ENDCASE
- b) Kode Program:
program menu_makanan_harian;varhari : integer;beginwriteln(‘masukan kode hari’); readln(hari);case hari of1 : write (‘hari senin,menu ayam bakar’);2 : write (‘hari seelasa,menu ikan goreng’);3 : write (‘hari rabu,menu dendeng’);4 : write (‘hari kamis,menu gulai kambing’);5 : write (‘hari jumat,menu ayam gulai’);6 : write (‘hari sabtu,menu sup buntut’);7 : write (‘hari minggu,menu gado-gado’);elsewrite (‘kode hari yang anda masukan salah’)end;readln;end.Kode Program
Cara kerjanya adalah:
Pengujian akan dilakukan mulai dari atas (kode hari 1) jika pengujian tidak cocok maka akan dilanjutkan ke kode hari berikutnya. Kalau ada yang cocok pernyataan sesudahnya akan di lewatkankan dan eksekusi dilanjutkan ke END.
Tetapi jika kode hari tidak ada yang cocok, maka bagian ELSE lah yang akan dikerjakan atau di eksekusi.
