Page 113 - Pemrograman Dasar kelas X

Bab 3 Struktur Percabangan 109

OmsetJual>
Salah Benar
100 juta

OmsetJual>= Bonus=
Salah Benar
50 juta 1,5%*OmsetJual

Bonus=
Bonus=0
1%*OmsetJual

Demikian juga pada bahasa Pascal, kita bisa menyajikan permasalahan di atas dalam sitantks
sebagai berikut.
if (kondisi1) then

pernyataan1
else if (kondisi2) then

pernyataan2
else
pernyataan3;

sehingga untuk permasalahan 1, dapat dituliskan bagian percabngannya adalah
if (Omset_Jual>100000000) then
bonus:=(1.5/100)*Omset_Jual

else if (Omset_Jual>=50000000) then
bonus:=(1/100)*Omset_Jual

else
bonus:=0;

Bagaimana dengan permasalahan kedua? Pada permasalahan kedua ini, kondisi jauh lebih

banyak, dalam hal ini ada 5 cabang atau kondisi sesuai dengan banyaknya jenis mobil. Selain itu
dalam setiap cabang ada lebih dari satu pernyataan sehingga sehingga dapat dituliskan kode

dalam Pascalnya adalah sebagai berikut.
If (jenis_Mobil=’Avanza’) then
Begin