Flowchart
Pembuatan Reservasi Tiket Rekreasi Tempat Wisata Kota Bunga:
Pseudocode
Pembuatan Reservasi Tiket Rekreasi Tempat Wisata Kota Bunga:
Header:
Program: Reservasi_Tempat_Rekreasi_Kota_Bunga,Lembang;
Input nama, nohp, hari, tanggal, a,b,c,d,hargareguler, hargaterusan, hargareguleranak, hargaterusananak, total,
dibayar, kembalian
{Mengisi data dalam rangka Reservasi Tempat Rekreasi Kota Bunga, Cianjur, Jawa Barat}
Declaration:
nama, nohp, hari,
tanggal : Char
a,b,c,d,hargareguler, hargaterusan, hargareguleranak, hargaterusananak, total,
dibayar, kembalian:String
hargareguler=100000, hargaterusan=150000, hargareguleranak=50000,
hargaterusananak =75000;
Deskripsi:
Begin
Writeln (“*******************************************”);
Writeln (“RESERVASI
TEMPAT REKREASI KOTA BUNGA, CIANJUR, JAWA BARAT”);
Writeln (“*******************************************”);
Writeln (“KOTA BUNGA”);
Writeln (“Jl. Hanjawar,
Desa Sukanagalih, Kecamatan Pacet, Cianjur,Jawa Barat”);
Writeln (“43253, 0818993267”);
Writeln (“Selamat Datang di Tempat
Rekreasi Kota Bunga ”);
Writeln(“Berikut ini adalah berbagai
tiket beserta harga tiket yang dapat anda pesan:");
Writeln(“A. Tiket Reguler : Rp.100.000”);
Writeln(“B. Taksi Terusan : Rp.150.000”);
Writeln (“C. Tiket Reguler
Anak (<5 Tahun) :Rp.50.000”):
Writeln (“D. Tiket Terusan
Anak (>5 Tahun) :Rp.75.000”):
Writeln(“Jika anda memiliki tiket
terusan, anda tidak perlu mengantre untuk menaiki wahana”);
Writeln("Silahkan isi data diri
anda ");
Writeln(“Nama Reservator :");
Read (nama_reservator);
Writeln (“No hp Reservator: ”);
Read (no_hp_reservator);
Writeln (“Hari Kedatangan: ”);
Read (hari_kedatangan);
Writeln (“Tanggal Kedatangan: ”);
Read (tanggal_kedatangan);
Writeln (“Jumlah Tiket yang Dipesan: “);
Writeln (“Tiket Reguler:");
Read (a);
Writeln (“Tiket Terusan:");
Read (b);
Writeln (“Tiket Reguler Anak:
”);
Read (c);
Writeln (“Tiket Terusan
Anak:”);
Read (d);
total = (a*hargareguler) +
(b*hargaterusan)+ (c*hargareguleranak) +
(d*hargaterusananak);
Writeln ("Harga Tiket:"+
total);
Writeln ("Dibayar :");
Read (dibayar);
Writeln ("Untuk info lebih
lanjut, silahkan hubungi 0818993267");
Println CETAKDATA
Println *******************************************
Println TEMPAT
REKREASI KOTA BUNGA, CIANJUR, JAWA BARAT
Println Selamat
Datang di Tempat Rekreasi Kota Bunga
Println KOTA BUNGA
Println Jl. Hanjawar, Desa
Sukanagalih, Kecamatan Pacet, Cianjur,Jawa Barat
Println 43253, 0818993267
Println Berikut ini adalah identitas
diri anda dan rincian reservasi tiket anda :
Println nama
Println nohp
Println hari
Println tanggal
Println total
Println dibayar
Println kembalian
Println Terimakasih
atas kedatangan Anda
Println Enjoy Your Great Day
Println Untuk info
lebih lanjut, silahkan hubungi 0818993267
End
Console
Eclipse Pembuatan Reservasi Tiket Rekreasi Tempat Wisata Kota Bunga:
Tidak ada komentar:
Posting Komentar