Sabtu, 22 November 2014

[MODUL 2] Pseudocode Program Reservasi Rental Mobil

Pseudocode Reservasi Rental Mobil

Header
Algoritma_Rental_Mobil
{membuat sistem kasir reservasi pada rental mobil}

Deklarasi
harga_mobil; nama; no_ktp; jenis_kelamin; umur; pekerjaan; no_tlp; alamat_asal; alamat_tujuan; tanggal_peminjaman =  string
lama_peminjaman; harga_sewa; jenis_mobil1 = 1500000; jenis_mobil2 = 1000000; jenis_mobil3 = 700000; jenis_mobil4 = 500000; jenis_mobil5 = 450000 = Int
n1; n2; n3; n4; n5 = Int
pajak; total; bayar; kembali = Int

Deskripsi                                                                                       
Begin
Writeln (“-----------------------------------------------------------------------------------------”)
Writeln (“*******************************************************”)
Writeln (“                          Selamat Datang di Renta Mobil Industrial                    ”)
Writeln (“                                        Silahkan isi data berikut                                ”)
Writeln (“-------------------------------------------------------------------------------------------”)
Writeln (“”)
Writeln ("--Jenis dan harga mobil yang dapat disewa-- ")
Writeln ("1. Alphard   = 1500000")
Writeln (“2. BMW       = 1000000”)
Writeln (“3. Jazz          = 700000”)
Writeln (“4. Xenia       = 500000”)
Writeln (“5. APV         = 450000”)
Writeln (“-------------------------------------------------------------------------------------------”)
Writeln (“”)
Writeln (“--IDENTITAS--”)
Writeln (“Masukkan Nama                 :”)
Read (nama)
Writeln (“Masukkan No KTP               :”)
Read (no_ktp)
Writeln (“Masukkan Jenis Kelamin    :”)
Read (jenis_kelamin)
Writeln (“Masukkan Umur                 :”)
Read (umur)
Writeln (“Masukkan Pekerjaan          :”)
Read (pekerjaan)
Writeln (“Masukkan No Tlp.               :”)
Read (no_tlp)
Writeln (“--DATA PERJALANAN--”)
Writeln (“PS. Alamat asal dan alamat tujuan ditulis lengkap!!”)
Writeln (“Masukkan Alamat Asal       :”)
Read (alamat_asal)
Writeln (“Masukkan Alamat Tujuan   :”)
Read (alamat_tujuan)
Writeln (“Masukkan Tanggal Peminjaman    :”)
Read (tanggal_peminjaman)
Writeln (“Masukkan Lama Peminjaman        :”)
Read (lama_peminjaman)
Writeln (“--Jenis Mobil--”)
Writeln (“Alphard                   :”)
Read (n1)
Writeln (“BMW                       :”)
Read (n2)
Writeln (“Jazz                          :”)
Read (n3)
Writeln (“Xenia                       :”)
Read (n4)
Writeln (“APV                         :”)
Read (n5)
Writeln (“”)
Writeln (“”)
Writeln (“-------------------------------------------------------------------------------------------”)
Writeln (“********************************************************”)
Writeln (“                                         Renta Mobil Industrial                                    ”)
Writeln (“                                  Terimakasih telah meminjam                              ”)
Writeln (“--------------------------------------------------------------------------------------------”)
Writeln ("Nama                      : " + nama.toUpperCase() )
Writeln ("No KTP                     : " + no_ktp.toUpperCase() )
Writeln ("Jenis Kelamin          : " + jenis_kelamin.toUpperCase() )
Writeln ("Umur : " + umur.toUpperCase() )
Writeln ("Pekerjaan : " + pekerjaan.toUpperCase() );
Writeln ("No Tlp. : " + no_tlp.toUpperCase() );
Writeln ("Alamat Asal : " + alamat_asal.toUpperCase())
Writeln ("Alamat Tujuan : " + alamat_tujuan.toUpperCase())
Writeln ("Lama Peminjaman : " + lama_peminjaman + " hari")
Writeln ("Alphard       : " + n1 )
Writeln ("BMW                       : " + n2 )
Writeln ("Jazz  : " + n3 )
Writeln ("Xenia           : " + n4 )
Writeln ("APV              : " + n5 )
Writeln (“-------------------------------------------------------------------------------------------”)
Writeln (“********************************************************”)
Writeln (“                                      Rental Mobil Industrial                                                  ”)
Writeln (“                                    Harga yang harus dibayar                                   ”)
Writeln (“--------------------------------------------------------------------------------------------”)
Writeln (“TOTAL PEMBAYARAN”)
harga_sewa = ((jenis_mobil1*n1) + (jenis_mobil2*n2) + (jenis_mobil3*n3)
+ (jenis_mobil4*n4) + (jenis_mobil5*n5)) * lama_peminjaman
Writeln (“Masukkan Harga Sewa : " + harga_sewa)
pajak = (10 * harga_sewa)/100
Writeln (“Masukkan Pajak : " + pajak )
total = harga_sewa + pajak
Writeln (“Masukkan Total : " + total”)
Writeln (“--------------------------------------------------------------------------------------------”)
Writeln (“********************************************************”)
Writeln (“                                      Rental Mobil Industrial                                       ”)
Writeln (“                      Jl. Keluarga TI no 14, Tembalang Semarang                     ”)
Writeln (“                                            0286 (322551)                                               ”)
Writeln (“--------------------------------------------------------------------------------------------”)
Writeln ("Nama                      : " + nama.toUpperCase())
Writeln (“No KTP                    : " + no_ktp.toUpperCase())
Writeln (“No Tlp.                    : " + no_tlp.toUpperCase())
Writeln (“Alamat Asal            : " + alamat_asal.toUpperCase())
Writeln (“Alamat Tujuan        : " + alamat_tujuan.toUpperCase())
Writeln (“Lama Peminjaman             : " + lama_peminjaman + " hari")
Writeln (“Alphard       : " + n1”)
Writeln (“BMW           : " + n2”)
Writeln (“Jazz              : " + n3”)
Writeln (“Xenia           : " + n4”)
Writeln (“APV             : " + n5”)
Writeln (“------------------------------------------------------------------------------------------------”)
Writeln (“Total            : " + total)
Writeln (“Bayar          :”)
Read (bayar)
kembali = bayar - total
Writeln (“Kembali       : " + kembali)
Writeln (“                                                Terima Kasih                                                 ”)
Writeln (“("----------------------------------------------------------------------------------------------”)

End

Tidak ada komentar:

Posting Komentar