Sistem Kasir Tiket DUFAN

Sistem Kasir Tiket DUFAN

Program ini bertujuan untuk melakukan proses pembayaran tiket masuk wahana hiburan DUFAN, dengan program ini pembeli dapat memesan tiket dengan jumlah yang diinginkan dan juga dapat mengetahui jumlah harga yang harus dibayarkan beserta kembaliannya. Hasil yang muncul dari program ini adalah struk pembayaran

 PSEUDOCODE SISTEM KASIR TIKET DUFAN

Algoritma_reservasi_tiket_dufan_{algoritma_pmbayaran_tiket_masuk_dufan}

Deklarasi

a (total anak)

d (total dewasa) ,

r (total rombongan) ,

p (total pasangan) ,

t (uang dibayarkan,

D (total bayar dewasa),

A (total bayar anak),

R (total bayar rombongan),

P (total bayar pasangan),

T (total bayar akhir)

Tt (uang dikembalikan)

= INTEGER

nama

=STRING

Deskripsi

   Begin

Println ( " DUNIA FANTASI" ) ;

Println ( " __________________________________" ) ;

Println (“ | DAFTAR HARGA TIKET |”);

Println ( " | Harga tiket Dewasa = Rp 150.000 |" ) ;

Println ( " | Harga tiket Anak= Rp 100.000 |" ) ;

Println ( " | Harga tiket Rombongan = Rp2.500.000 |" ) ;

Println ( " | Harga tiket Pasangan= Rp 250.000 |" ) ;

Println ( " | *rombongan berjumlah maksimal 25 orang |" ) ;

Println ( " | baik dewasa maupun anak |" ) ;

Println ( " __________________________________" )

Println (" ");

Writeln ("Pemesanan atas nama: ");

Read (nama);

Println (" ");

Writeln(" Masukan jumlah pengunjung dewasa =") ;

Read (d);

Writeln(" Masukan jumlah pengunjung anak =") ;

Read (a);

Writeln(" Masukan jumlah pengunjung rombongan =") ;

Read (r);

Writeln(" Masukan jumlah pengunjung pasangan =") ;

Read (p);

Println (“ “);

Println ( " ____________________________________" ) ;i

 D = d* 150000;

 A = a* 100000;

 R = r* 2500000;

 P = p* 250000;

 T = D+A+R+P;

Println (“Total bayar Dewasa = “+D);

Println (“Total bayar Anak = “+A);

Println (“Total bayar Rombongan = “+R);

Println (“Total bayar Pasangan = “+P);

Println (“ “);

Println ( " ____________________________________" ) ;

Println ("Total bayar = "+T );

Println ( " ____________________________________" ) ;

Println (" ");

Writeln ("Masukan pembayaran Anda : ");

Read (t);

Tt = t-T;

            if (t<T) {

                        Println ("Maaf pembayaran Anda tidak mencukupi total bayar);

                        }

            else {

Println ("====================================================");

Println (" ");

Println ("#######      ##     ##  ##########  ###########  ####      ##");

Println ("##     ##     ##     ##  ##           ##         ##  ## ##     ##");

Println ("##      ##    ##     ##  ##           ##         ##  ##  ##    ##");

Println ("##        ##  ##     ##  ########   ###########  ##   ##   ##");

Println ("##      ##    ##     ##  ##           ##        ##  ##    ##  ##");

Println ("##     ##     ##     ##  ##           ##        ##  ##     ## ##");

Println ("#######      #########  ##          ##        ##  ##      ####");

Println (" ");

Println ("DUNIA FANTASI AMUSEMENT PARK");

Println ("Jalan Lodan Timur No. 7, Ancol");

Println ("Jakarta Utara, DKI Jakarta 14430, Indonesia");

Println ("RSVP: 222-757");

Println (" ");

Println ("Order# "+nama);

Println (" ");

Println ("Jumlah tiket Dewasa : "+d+"                                                Rp "+D);

Println ("Jumlah tiket Anak : "+a+"                                         Rp "+A);

Println ("Jumlah tiket Rombongan : "+r+"                               Rp "+R);

Println ("Jumlah tiket Pasangan : "+p+"                                   Rp "+P);

Println ("----------------------------------------------------------------");

Println ("Total                                                                         Rp "+T);

Println (" ");

Println ("Pembayaran                                                  Rp "+t);

Println ("Kembali                                                        Rp "+Tt);

Println (" ");

Println ("Enjoy Your Visit at DUNIA FANTASI! :)");

Println ("Visit Our Pages");

Println ("https://www.ancol.com/id/destinasi/dunia-fantasi");

Println ("Kritik dan saran hubungi 222-454");

Println (" ");

Println ("=====================================================");

                        }

End

Flowchart Sistem Kasir Tiket DUFAN

Tampilan Listing Sistem Kasir

Console Sistem Kasir Tiket DUFAN