RSS

Minggu, 27 Desember 2009

[Borland]Tugas Liburan UTS ,

Nih contoh Tugas Liburan UTS yg kemaren,ini script buat yg tugas yg kita suruh buat sendiri,
silahkan di pakai ato di edit2,

#include "conio.h"
#include "stdio.h"
#include "iosream.h"
#include "iomanip.h"


tobay (int hrg,int jm_bel)
{
return (hrg*jm_bel);
}

main()
{
struct
{
int harga,jm_beli,total;
char nm_pnyw[20],nm_kereta[20],kd_kereta;
}nama[99];
int uang_byr;
int kmbl;
int tot_byr=0;
int i,a;
char c;
kembali:
clrscr();
i=1;
cout<<"Masukan Jumlah Data = ";cin>>a;
while (i<=a) { cout<<"Data Ke - "<<<<<"Nama Pembeli : ";gets(nama[i].nm_pnyw); cout<<"Kode Kereta [1/2/3] : ";cin>>nama[i].kd_kereta;
if (nama[i].kd_kereta=='1')
{
strcpy (nama[i].nm_kereta,"Kereta Ekonomi");
nama[i].harga=100000;
}
else if (nama[i].kd_kereta=='2')
{
strcpy (nama[i].nm_kereta,"Kereta Bisnis");
nama[i].harga=200000;
}
else if (nama[i].kd_kereta=='3')
{
strcpy (nama[i].nm_kereta,"Kereta Express");
nama[i].harga=300000;
}
else
{
strcpy (nama[i].nm_kereta,"Kode Salah");
nama[i].harga=0;
}
cout<<"Jumlah Beli : ";cin>>nama[i].jm_beli;
nama[i].total=tobay(nama[i].harga,nama[i].jm_beli);
tot_byr=tot_byr+nama[i].total;

i++;
}
clrscr();
cout<<"================================================================"<<<"No. Nama Kode Nama Banyak Harga "<<<" Pembeli Kereta Kereta Beli Tiket "<<<"================================================================"<<=a) { cout<<<<<<<<<<<<<<<<<<<<<"================================================================"<<<<<"----------------------------------------------------------------"<<<"Total Yang Harus Di Bayar = Rp. "<<<<"Uang Bayar = Rp. ";cin>>uang_byr;
cout<<"----------------------------------------------------------------"<<<"Uang Kembalian = Rp. "<<<<"----------------------------------------------------------------"<<<"Ingin Input Data Lagi Ga ?? [Y/N]";cin>>c;
if (c=='y' || c=='Y')
goto kembali;
else
getch();
}



ini adalah contoh untuk script yg memuat function,struct, array,
sedangkan untuk ketentuan soal nya nyusul nanti ya,lagi males bikin ,



0 komentar:

Posting Komentar