Pseudocode Paket 500 KartuAS
Algoritma_paket_500_kartuAS_{algoritma_pemilihan_dan_pembelian_paket_500_kartu_AS}
Deklarasi
p(pilihan pertama),
t(pilihan kedua),
k(pilihan ketiga)
= INTEGER
Deskripsi
Begin
println ("Kode Paket 500 adalah
*100*999#");
Writeln ("Masukan kode Paket
500 : ");
Read (c);
if
*100*999# ;
println ("
========================================== ");
println ("| KARTU AS |");
println ("|
|");
println ("| ***Paket
500*** |");
println ("| 0. Info paket |");
println ("| 1. Facebook |");
println ("| 2. Telepon |");
println ("| 3. SMS |");
println ("| 4. Internet &
Chatting |");
println ("| 5. Video |");
println ("| 6. NSP |");
println ("| 7. Cek KOIN |");
Writeln ("| Pilihan : |");
Read (p) ;
println ("
========================================== ");
if (p==0)
println (" Menu Info
Paket");
println
("-----------------");
println ("1. Syarat isi
ulang");
println ("2. KOIN
Undian");
println ("3. Hadiah
Smartphone");
Writeln ("Pilihan : ");
Read (t);
if (t==1)
println ("Isi Ulang Rp10rb bisa
beli Paket 500 untuk 1 hari. Isi ulang mulai Rp20rb bisa beli Paket 500 untuk 3
hari");
else if (t==2)
println ("Paket Internet,
Facebook, Video, dapat 10 KOIN untuk paket nelpon, SMS dapat 5 KOIN");
else
if (t==3)
println ("Hadiah 2000
Smartphones, diundi mulai November 2014. Perbanyak isi ulang, beli Paket 500
dan kumpulkan KOIN dari sekarang sebanyak-banyaknya!");
else
println ("PILIHAN TIDAK
TERSEDIA");
else if (p==1)
println (" Menu
Facebook");
println
("---------------");
println ("Facebook seharian
cuma Rp500 (pemakaian normal) + dapat 10 KOIN");
println ("1. Beli");
println ("2. Info pemakaian
normal");
Writetln ("Pilihan : ");
Read(t);
if (t==1) {
println ("Terimakasih
permintaan Paket Facebook 500 Anda sedang kami proses");
else if (t==2)
println ("Kuota pemakaian
normal Paket Facebook adalah 30MB. Selebihnya akan mengurangi kuota paket
internet yang aktif atau dikenakan tarif normal");
else
println ("PILIHAN TIDAK
TERSEDIA");
else if (p==2) {
println
(" Menu Telepon");
println
("--------------");
println
("Nelpon serba Rp500 + dapat 5 KOIN ");
println
("1. Siang 50 menit (00-17)");
println
("2. Malam 30 menit (17-24)");
Writeln
("Pilihan : ");
Read(t);
if (t==1)
println
("Terimakasih permintaan Paket Nelpon Siang 50 menit (00-17) Anda sedang
kami proses");
else if (t==2)
("Terimakasih permintaan Paket Nelpon
Malam 30 menit (17-24) Anda sedang kami proses");
else
println ("PILIHAN TIDAK
TERSEDIA");
else if (p==3)
println
(" Menu SMS");
println
("----------");
println
("SMS serba Rp500 + dapat 5 KOIN");
println
("1. SMS 100 siang (00-17)");
println
("2. SMS 50 malam (17-24)");
Writeln
("Pilihan : ");
Read(t);
if (t==1)
println ("Terimakasih
permintaan Paket SMS 100 Siang (00-17) Anda sedang kami proses");
else if (t==2)
println ("Terimakasih
permintaan Paket SMS 50 Malam (17-24) Anda sedang kami proses");
else
println ("PILIHAN TIDAK
TERSEDIA");
else if (p==4) {
println (" Menu Internetan
& Chattingan");
println
("------------------------------");
println ("Pilih Internetan atau
Chatting seharian cuman Rp500 + dapat 10 KOIN");
println ("1. Internetan
30MB");
println ("2. Chatting (khusus
WA, Line, BBM");
Writeln ("Pilihan :");
Read(t);
if (t==1)
println ("Terimakasih
permintaan Paket Internetan 30MB Anda sedang kami proses");
else if (t==2)
println ("Terimakasih
permintaan Paket Chatting (khusus WA, Line, BBM) Anda sedang kami
proses");
else
println ("PILIHAN TIDAK
TERSEDIA");
else if (p==5)
println (" Menu Video");
println ("------------");
println ("Beli Paket 500 untuk
nonton 2 Video Seru di klip.telkomsel.com ?");
println ("1. Ya");
println ("2. Tidak");
Writetln ("Pilihan : ");
Read(t)
if (t==1)
println ("Terimakasih
permintaan Paket 500 Video Anda sedang kami proses");
else if (t==2)
println ("Video seru ngga bikin
ragu!");
else
println ("PILIHAN TIDAK
TERSEDIA");
else if (p==6)
println (" Menu NSP");
println ("----------");
println ("Cuma Rp500 dapat 1
Voucher NSP-7 hari senilai Rp5000. Pilih NSP-mu: ");
println ("1. Coldplay");
println ("2. Linkin
Park");
println ("3. Maliq &
D'Essentials");
println ("4. Tangga");
Writeln ("Pilihan : ");
Read(t);
if (t==1)
println ("Pilih lagu Coldplay
yang anda inginkan : ");
println ("1. Magic");
println ("2. Fix You");
println ("3. Viva la
Vida");
Writeln ("Pilihan : ");
Read(k);
if (k==1)
println ("Terimakasih
permintaan NSP 7-hari Coldplay-Magic Anda sedang kami proses");
else if (k==2)
println ("Terimakasih
permintaan NSP 7-hari Coldplay-Fix You Anda sedang kami proses");
else if (k==3)
println ("Terimakasih
permintaan NSP 7-hari Coldplay-Viva la Vida Anda sedang kami proses");
else if (t==2)
println ("Pilih lagu Linkin
Park yang Anda inginkan : ")
println ("1. What I've
Done");
println ("2. A Light That Never
Comes");
println ("3. Guilty All The
Same");
Writeln ("Pilihan : ");
Read(k);
if (k==1)
println ("Terimakasih
permintaan NSP-7hari Linkin Park-What I've Done Anda sedang kami proses");
else if (k==2)
println ("Terimakasih
permintaan NSP-7hari Linkin Park-A Light That Never Comes Anda sedang kami
proses");
else if (k==3)
println ("Terimakasih
permintaan NSP-7hari Linkin Park-Guilty All The Same Anda sedang kami
proses");
else if (t==3)
println ("Pilih lagu Maliq
& D'Essentials yang Anda inginkan : ");
println ("1. Pilihanku");
println ("2. Sri Wedari");
println ("3. Untitled");
Writeln ("Pilihan : ");
Read(k);
if (k==1)
println ("Terimakasih
permintaan NSP-7hari Maliq & D'Essentials-Pilihanku Anda sedang kami
proses");
else if (k==2)
println ("Terimakasih
permintaan NSP-7hari Maliq & D'Essentials-Sri Wedari Anda sedang kami
proses");
else if (k==3)
println ("Terimakasih
permintaan NSP-7hari Maliq & D'Essentials-Untitled Anda sedang kami
proses");
else if (t==4)
println ("Pilih lagu Tangga
yang Anda inginkan : ");
println ("1. Hebat");
println ("2. Cinta Begini");
println ("3. Utuh");
Writeln ("Pilihan : ");
Read(k);a
if (k==1)
println ("Terimakasih
permintaan NSP-7hari Tangga-Hebat Anda sedang kami proses");
else if (k==2)
println ("Terimakasih
permintaan NSP-7hari Tangga-Cinta Begini Anda sedang kami proses");
else if (k==3)
println ("Terimakasih
permintaan NSP-7hari Tangga-Utuh Anda sedang kami proses");
else
println ("PILIHAN TIDAK
TERSEDIA");
else if (p==7)
println ("Terimakasih
permintaan cek KOIN Anda sedang kami proses");
else
println ("PILIHAN TIDAK
TERSEDIA");
else
println ("Kode tidak
tersedia");
END
Flowchart Paket 500 Kartu AS
Listing Paket 500 Kartu AS
Console Paket 500 Kartu AS
Tidak ada komentar:
Posting Komentar