CARA MEMBUAT PROGRAM TIKET KERETA API by Borland C++

//BINA SARANA INFORMATIKA //

1. Gunakan Borland C++ 5.02 untuk membuat program tiket KA.....
2. Melakukan Text Editor....

 3. kemudian paste codingnya

 4. terus simpan...di folder my documents anda, dan tinggl compile serta running...


Source Coding C++ :

#include
#include
#include

main()
{
char nama[30],pilih,*kereta,lagi;
int jumlah,harga;
long int total,ppn,bayar,kembali,ttlbayar;
atas :
clrscr();
cout<<"        Data Kereta Api"<
cout<<"        1. Argo Lawu"<
cout<<"        2. Argo Bromo"<
cout<<"        3. Parayangan"<
cout<<"        4. Taksaka"<
cout<<"**********http://lhourenskotak.blogspot.com/**********"<
          //inputan
cout<<"Nama Penumpang             : ";gets(nama);
cout<<"Masukan Pilihan Anda [1..4]: ";cin>>pilih;
cout<<"Masukan jumlah tiket       : ";cin>>jumlah;
          //Proses
if(pilih=='1')
{
kereta="Argo Lawu";
harga=200000;
}
else if(pilih=='2')
{
kereta="Argo Bromo";

harga=180000;
}
else if(pilih=='3')
{
kereta="parayangan";
harga=90000;
}
else if(pilih=='4')
{
kereta="Taksaka";
harga=70000;
}
else
{
kereta="Kode salah";
harga=0;
}
total=jumlah*harga;
ppn=0.1*total;
ttlbayar=total+ppn;
clrscr();
      //hasil Keluaran
cout<<"Nama Pemesan    :   "<<
cout<<"Jumlah Beli     :   "<<
cout<<"Nama Kereta     :   "<<
cout<<"Harga Tiket     :Rp "<<
cout<<"Total Harga     :Rp "<<
cout<<"PPN             :Rp "<<
cout<<"============================="<
cout<<"Total Bayar     :Rp "<<
cout<<"Uang Bayar      :Rp ";cin>>bayar;
kembali=bayar-ttlbayar;
cout<<"kembali         :Rp "<<
printf("\n\n");
cout<<"         ******http://bsiprogrammer.ohlog.com********           "<
printf("\n\n");
cout<<"Input Transaksi Baru [Y/T] : ";cin>>lagi;
if (lagi=='Y'||lagi=='y')
goto atas;
getch();
}