ALGORITMA PROGRAM:
Pertama:
Pada permulaan operator(perawat) memasukkan identitas pasien yang akan dirawat inap di rumah sakit tersebut.
Kedua:
Perawat memasukkan identitas seperti nama, alamat, golongan darah, dll.
Ketiga:
Tahap selanjutnya perawat akna mulai menanyakan pasien kan menginap di kamar yang mana. Tersedia kamar VVIP, VIP, dan General.
Keempat:
Dengan ketentuan harga yang sudah di tatapkan setelah itu pasien akan ditanyai apakah ingin tetap menginap di kamar tersebut, pasien akan menginap selama beberapa hari yang sudah ditentukan oleh dokter.
Setelah semua terisi data masukkan kamar apa yang di pilih, berapa lama pasien akan menginap dan total biaya kan disimpan di suatu file bernama zzz.txt
Terahir:
Selesai
OUTPUT PROGRAM:
1. Running Program Pengisian Identitas Pasien2. Running Contoh Program Pemilihan Kamar VVIP
3. Penyimpanan Data dari Program Pemilihan Kamar VVIP di zzz.txt
CODING PROGRAM DATABASE MENGGUNAKAN BAHASA C:
//SILAHKAN GANTI TULISAN PADA INCLUDE YAITU "(" MENJADI "<" DAN ")" MENJADI ">"
#include(stdio.h)
#include(conio.h)
#include(io.h)
#include(math.h)
int main()
{
//Pada Program di bawah ini adalah program pemasukkan identitas
\struct Rumah_sakit
{
char nama[50];
char alamat[100];
int tggi[5], brt[5];
char golda[3];
char ayah[50];
char ibu[50];
};
Rumah_sakit pasien;
printf("Masukkan Identitas Pasien di bawah ini : \n");
printf("\nNama : ");
scanf("%s",pasien.nama);
printf("Alamat : ");
scanf("%s",pasien.alamat);
printf("Golongan darah : ");
scanf("%s",pasien.golda);
printf("Tinggi Badan : ");
scanf("%d",pasien.tggi);
printf("Berat badan : ");
scanf("%d",pasien.brt);
printf("\n========================================\n");
printf(" Masukkan Nama Orang tua Pasien...\n");
printf("\nAyah : ");
scanf("%s",pasien.ayah);
printf("Ibu : ");
scanf("%s",pasien.ibu);
getch();
//Pada tahap ini Pemesanan Kamar
int kamar;
FILE *frs;
printf("\n\n");
printf("Anda Memasuki tahap selanjutnya...\n");
printf("\n>>Pemesanan Kamar\n");
printf("Anda ingin memesan kamar : \n");
printf("\n1. Kamar VVIP\n2. Kamar VIP\n3. General\n\n");
printf("Masukkan pilihan Anda : ");
kamar = getch();
int total;
int vvip=3, vip=2, gen=1;
int hari;
char setuju;
switch (kamar)
{
case '1':
printf("\nAnda telah memilih kamar VVIP\n");
printf("Harga sewa kamar Rp 3.000.000,00 @hari\n");
printf("Apakah Anda setuju? (Y/N)\n");
setuju = getch();
switch (setuju)
{
case 'y':
frs = fopen("zzz.txt","a+");
printf("\nBerapa hari hari Pasien dirawat : \n");
scanf("%d",&hari);
total=hari*vvip;
printf("\nTotal Biaya Yang Pasien Bayar : %d juta",total);
fprintf(frs,"\nAnda telah memilih kamar VIP\nHarga sewa kamar Rp 3.000.000,00 @hari\nselama %d hari\ndengan biaya %d juta rupiah\n",hari,total);
fclose (frs);
getch();
return 0;
break;
case 'n':
printf("Maaf ya..");
break;
};
break;
case '2':
printf("\nAnda telah memilih kamar VIP\n");
printf("Harga sewa kamar Rp 2.000.000,00 @hari\n");
printf("Apakah Anda setuju? (Y/N)\n");
setuju = getch();
switch (setuju)
{
case 'y':
frs = fopen("zzz.txt","a+");
printf("\nBerapa hari hari Pasien dirawat : \n");
scanf("%d",&hari);
total=hari*vip;
printf("\nTotal Biaya Yang Pasien Bayar : %d juta",total);
fprintf(frs,"\nAnda telah memilih kamar VIP\nHarga sewa kamar Rp 2.000.000,00 @hari\nselama %d hari\ndengan biaya %d juta rupiah\n",hari,total);
fclose (frs);
getch();
return (0);
break;
case 'n':
printf("Maaf ya..");
break;
};
break;
case '3':
printf("\nAnda telah memilih kamar General\n");
printf("Harga sewa kamar Rp 1.000.000,00 @hari\n");
printf("Apakah Anda setuju? (Y/N)\n");
setuju = getch();
switch (setuju)
{
case 'y':
frs = fopen("zzz.txt","a+");
printf("\nBerapa hari Pasien dirawat : ");
scanf("%d",&hari);
total =hari*gen;
printf("\nTotal Biaya Yang Pasien Bayar : %d juta",total);
fprintf(frs,"\nAnda telah memilih kamar VIP\nHarga sewa kamar Rp 1.000.000,00 @hari\nselama %d hari\ndengan biaya %d juta rupiah\n",hari,total);
getch();
fclose (frs);
return (0);
break;
case 'n':
printf("Maaf Silahkan Anda Keluar..");
break;
};
break;
}getch();
}
Semoga bermanfaat!
Sumber: Nur Cahyo (L2F008073) Teknik Elektro UNDIP
Programnya menarik bgt, boleh dicoba dan dipelajari! thank's..
ReplyDelete