Rabu, 26 November 2014

Revisi Jurnal Modul 2 = "Kasir Reservasi Rental Bus Pariwisata"

"Kasir Reservasi Rental Bus Pariwisata" 

 

1. Pseudocode "Kasir Reservasi Rental Bus Pariwisata"

Header:
Informasi_Reservasi_Penyewaan_Bus_Pariwisata_Kelompok_33
Declaration:
Input nama, notelp, no identitas, alamat, tanggal sewa, jumlah bus, lamapinjam; harga; total harga
Description:
Begin
Println();
Println("]]]]]]]]]]]]]]]]]]]]]]][[[[[[[[[[[[[[[[[[[[[[[[[[");
Println("Selamat Datang di Jasa Bus Pariwisata Kelompok 33");
Println("]]]]]]]]]]]]]]]]]]]]]]][[[[[[[[[[[[[[[[[[[[[[[[[[");
Println();
Write("Nama : ");
Read(nama)
Write("No HP: ");
Read(notelp)
Write("No Identitas : ");
Read(noidentitas)
Write("Alamat : ");
Read(alamat)
Println("Harga Bus (satuan) : 850000");
Write("Tanggal Sewa : ");
Read(tanggalsewa)
Write("Jumlah Bus : ");
Read(jmlbus)
Write("Lama Peminjaman (hari) : ");
Read(lamapinjam)
c=hargabus*jmlbus*lamapinjam;
ht=(int) (c*9/10);

Println("Informasi Reservasi Penyewaan Bus Pariwisata Kelompok 33.");
Println();
Println("Nama                                : "+nama);
Println("No Indentitas                 : "+noidentitas);
Println("Alamat                        : "+alamat);
Println("No HP                         : "+notelp);
Println("Harga Bus/satuan                    : Rp.850.000,00");
Println("Harga Bus/hari                : Rp.850.000,00");
Println("Jumlah Bus                          : "+jmlbus);
Println("Lama Peminjaman/hari          : "+lamapinjam);
Println("Harga                         : Rp."+c+",00");
Println();
Println("Diskon 10% untuk harga mencapai Rp. 30.000.000,00 atau lebih");
Println();
if (c >=30000000)
{
Println("Harga Total                : Rp."+ht+",00")
}
else {
Println("Harga Total                : Rp."+c+",00");}
Println("Terimakasih telah menggunakan jasa Bus Pariwisata Kelompok 33");

End
 
 

2. Flowchart "Kasir Reservasi Rental Bus Pariwisata"

 

3. Screenshoot Program "Kasir Reservasi Rental Bus Pariwisata"

 




Tidak ada komentar:

Posting Komentar