Program
Untuk Perhitungan Biaya Pemakaian Listrik Dengan Menggunakan Procedure Pada
Bahasa Pemrograman Turbo Pascal
Semakin
hari Kebutuhan semakin bertambah setelah harga BBM naik bulan juni 2013, namun
harga kebutuhan pokok justru semakin naik. Dan setelah diselidiki ternyata ada
hubungannya juga dengan kenaikan Tarif dasar listrik yang kadang dihiasi dengan
kenaikan BBM. Nah makanya mulai sekarang kita mesti belajar ngirit. Sebagai
contoh kasus misalnya, tarif dasar listrik Rp. 100,- per KWh. dengan ketentuan
sebagai berikut :
Flowchart Dan Bahasa Pemrograman Pascal
Menghitung Daya Listrik
Berikut ini merupakan listing program perhitungan
biaya KWH listrik dengan menggunakan procedure pada bahasa pemrograman pascal
1.
Jika Daya yang digunakan > 1300 VA maka :
- jika pemakaian > 300 KWh maka dikenakan denda 10%
- jika pemakaian <= 300 KWh maka dikenakan diskon 10%
2. Jika Daya yang digunakan <= 1300 VA maka :
- jika pemakaian > 100 KWh maka dikenakan denda 20%
- jika pemakaian <= 100 KWh maka dikenakan diskon 20%
- jika pemakaian > 300 KWh maka dikenakan denda 10%
- jika pemakaian <= 300 KWh maka dikenakan diskon 10%
2. Jika Daya yang digunakan <= 1300 VA maka :
- jika pemakaian > 100 KWh maka dikenakan denda 20%
- jika pemakaian <= 100 KWh maka dikenakan diskon 20%