Program Untuk Perhitungan Biaya Pemakaian Listrik Dengan Menggunakan Procedure Pada Bahasa Pemrograman Turbo Pascal

Semakin hari Kebutuhan semakin bertambah setaleh harga BBM naik bulan juni 2013, namun harga kebutuhan pokok justru semakin naik. Dan setelah diselikidiki ternyata ada hubungannya juga dengan kenaikan Tarif dasar listrik yang kadang dihiasi dengan kenaikan BBM. Nah makanya mulai sekarang kita mesti belajar ngirit. Untuk itu pada artikel ini akan dibahas mengenai pengiritan Listrik, tepatnya perhitungan biaya pemakaian listrik supaya kita bisa ngirit dalam menggunakan setrum atau listrik
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 bahasapemrograman 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%

Referensi         :

http://tprasetio.blogspot.com/2012/05/program-untuk-perhitungan-biaya.html  01 juli 2013