postingan kali ni gw bakal posting tentang bahasa pemograman pascal, dan dalam bahasan kali ni gw akan menguak tentang case of. sebenarnya case of masih dalam keluarga percabangan, sama dengan IF. bedanya kalo kita make case of untuk menuliskan syntax nya lebih singkat.
Percabangan
Menggunakan Banyak Pilihan (Case Of Else):
Case...Of
adalah pemecahan dari If bertingkat. Pada Case...Of dapat dilakukan
perbandingan beberapa kondisi dari suatu variabel. Adapun struktur penulisan
Case...Of adalah:
Case variabel_bernilai_ordinal Of
Peluang
{Peluang berupa piliha-pilihan sbb :
--PILIHAN_1--;
--PILIHAN_2--;
--PILIHAN_ke-N--; }
End;
dimana
variabel adalah variabel yang akan diperiksa isinya, peluang adalah kemungkinan
isi variabel dan apa yang dilakukan jika peluang tersebut benar.
Penambahan
Else pada Case...Of adalah untuk mengambil alih pilihan yang terdapat pada
daftar pilihan.
Tata
cara penulisan Case...Of dengan Else adalah :
Case variabel Of peluang
{Peluang berupa pilihan-pilihan sbb :
--PILIHAN_1--;
--PILIHAN_2--;
...
--PILIHAN_ke-N--; }
Else bagian_Else
{Bagian_Else berupa satu pilihan
ke-N+1:
--PILIHAN_ke-N+1--;}
End;
Jika kondisi variabel pada program terdapat
masukan di luar pilihan, secara otomatis proses program akan dilempar ke Else,
bukan keluar dari struktur Case seperti pada Case...Of.terlalu banyak teori juga gak asik kan gan, ni gw kasih soal beserta (cak ile beserta) penyelesaian nya
Sebuah tagihan rekening listrik bulanan dengan ketentuan
sbb:
Untuk rumah dengan
kategori Daya 450KW : T1 = 300, T2 = 500, T3 = 800
Daya 900KW : T1 = 400, T2
= 600, T3 = 1000
Daya 1300KW : T1 = 500,
T2 = 700, T3 = 1250
Daya 2200KW :
T1 = 600, T2 = 800, T3 = 1500
Dengan jumlah pemakaian
dihitung dari jumlah meteran akhir dikurangi dengan jumlah meteran awal.
Dan besarnya beban
dihitung dari jumlah hasil kali Daya dengan 20.
a.
Jika jumlah pemakaian kecil atau sama dengan 30, maka
biaya pemakaian = jumlah pemakaian x T1.
b.
Jika jumlah pemakaian kecil atau sama dengan 60, maka
biaya pemakaian = (30xT1) + (jumlah pemakaian – 30) x T2.
c.
Jika jumlah pemakaian besar dari 60, maka
biaya pemakaian = (30xT1) + (jumlah pemakaian – 30) x T2.
d.
Jumlah biaya = beban + biaya pemakaian
e.
Dan untuk biaya total akan dikenakan pajak 10% dari biaya.
Hitunglah total
tagihan bulanan rekening listrik yang harus dibayar setelah dikenakan pajakhayoo.bisa gak nyelesaikan nya??
klo bingung ni jalan cerita nya gan.hhe
ni flowchart nya gan
ni listing program nya
ok lah.cuma setetes yang bisa gw posting kali ni
kalo ada pertanyaan langsung aja gan komen gan.
2 comments:
apa selalu ada golongannya y??? seperti T1,T2,T3 dst.....
tergantung permintaan program-nya aja. ini kan hanya contoh penggunaan case dalam pascal yang diimplementasikan dalam kasus tagihan listrik :)
Posting Komentar
tinggalkan pesan dan saran agar blog sederhana ini dapat berkembang