Yuk! Belajar Pemrograman Visual Basic dot Net Di Mesran.Net

Yuk! Belajar Pemrograman Visual Basic dot Net Di Mesran.Net

Selesaikanlah Kasus Berikut :

Program Pembayaran Rekening Listrik

 

 Ketentuan Proses :

1. Kode, Pemakaian di INPUT
2. Proses Beban dan HargaKWH

     Jika kode = 1 maka
           Jenis Pelanggan = "RUMAH"
           Beban = 25000
           HargaKWH = 3000

     Atau Jika kode = 2 maka
           Jenis Pelanggan = "TOKO"
           Beban = 50000
           HargaKWH = 5000
    
    Atau Jika kode = 3 maka
          Jenis Pelanggan = "PABRIK"
          Beban = 100000
          HargaKWH = 10000

3. Pembayaran = Beban + HargaKWH * Pemakaian

Berikut Jawaban Program :

#include "stdio.h"
#include "conio.h"
void main(){
    int i, kode[0], pemakaian[0], jumdata=3;
    char * jenis pelanggan ;
    float beban, pembayaran ;

    printf ("\n Input Data Pembayaran Rekening Listrik") ;
    for(i=0 ; i        printf ( "\nJenis pelanggan   : ") ; scanf("%d", &kode[i]) ;
        printf ( " : ") ; scanf("%d", &pemakaian[i]) ;
    }
    clrscr() ;
    printf ("\n Informasi Pembayaran Rekening Listrik") ;
    printf ("\n-------------------------------------------------------") ;
    printf ("\n No  Kode    Jenis Pelanggan   Beban  Pemakaian  Pembayaran") ;
    printf ("\n-------------------------------------------------------") ;
    for(i=0 ; i        if(kode[i]==1){
            produk = "RUMAH" ; beban = 25000 ; hargaKWH = 3000
        }else if(kode[i]==2){
            produk = "TOKO" ; beban = 50000 ; hargaKWH = 5000
        }else if(kode[i]==3){
            produk = "PABRIK" ; beban = 100000 ; hargaKWH = 10000
        }
        pembayaran = beban+hargaKWH[i]*pemakaian ;
        gotoxy(1,6+i) ; printf("  %i   %d     %s", i+1, kode[i], jenis pelanggan) ;
        gotoxy(30,6+i) ; printf("%10.0f %i %10.0f", beban, pemakaian[i], pembayaran) ;
    }
    printf ("\n-------------------------------------------------------") ;

}

Tampilan :

Input Data Pembayaran Rekening Listrik
Jenis pelanggan : RUMAH
Kode : 1
Pemakaian : 10

Informasi Pembayaran Rekening Listrik
------------------------------------------------------------------------------------------------
No   Kode   Jenis Pelanggan              Beban       Pemakaian       Pembayaran
------------------------------------------------------------------------------------------------
 1        1       RUMAH                       25000        10                 280000



Demikilahlah postingan saya
Nama : IRMA
NPM : 14110469
Kelas : TI-M 1418
Selamat Belajar Pemrograman VB NET