Deskripsi Program
Program ini dibuat untuk memesan paket internet terutama untuk smartphone. Provider yang kami jadikan referensi adalah provider SIMPATI. Kami mengambil bagian Paket Internet LOOP. Cara menjalankan programnya sangat mudah sekali, hanya dengan mengikuti perintah yang ada di dalam program kami ini.
Pseudocode
Pseudocode
Program Paker Provider
Header
Program
Paket_Internet_LOOP_Simpati
{pemesanan paket
internet dengan berbagai criteria}
Deklarasi
step1,step2,pulsa,sisa,acak,angka,lagi : int
acak=1-1000=random
kode="*567#" : char
back = true : boolean
pulsa = 150000
Deskripsi
BEGIN
Do;
Writeln
("Masukkan nomor service *567# : ");
Read (kode);
Println
(Kode Angka: “+acak);
Writeln
(“Masukkan kode angka: “
Read
(angka)
if (kode==”*567#")&&acak==angka);
while(back=true);
Println ("Selamat datang di paket
internet LOOP Simpati");
Println ("Pilihan Menu");
Println ("1. On LOOP Holic");
Println ("2. Gila onLOOP");
Println ("3. Maxi LOOP");
Println ("4. MIDI LOOP");
Println ("5. SEVEN LOOP");
Writeln ("Pilihan :");
Read (step1);
if
(step1==1);
Println
("Paket ini memberikan layanan data sebesar 12 GB");
Println
("11GB di waktu prioritas (00.00-09.00)");
Println
("1.2GB di waktu non-prioritas");
Println
("Berlaku selama 30 hari");
Println
Tarif: Rp. 50.000,-");
Println
(“1. Daftar Paket");
Println
("2. Kembali");
Writeln
("Pilihan :");
Read
(step2);
if (step2==1);
if (pulsa<50000);
Println
("Maaf pulsa anda tidak mencukupi");
break;
else;
Println
("Terima kasih, pilihan anda sedang diproses");
Sisa=pulsa-50000;
Println (“Sisa pulsa anda : “+sisa);
break;
else if (step2==2);
Println ("");
Else;
Println ("Kode yang anda masukkan tidak
tersedia");
Break;
else if (step1==2){
Println
("Paket data pada waktu non-prioritas sebesar 3.5GB");
Println
("Total adalah 16GB jika digabung dengan data pada waktu prioritas");
Println
("Berlaku selama 30 hari");
Println
("Tarif: Rp. 100.000,-");
Println
("1. Daftar Paket");
Println
("2. Kembali");
Writeln
("Pilihan :");
Read
(step2);
if (step2==1);
if (pulsa<100000);
Println
("Maaf pulsa anda tidak mencukupi");
break;
else;
Println
("Terima kasih, pilihan anda sedang diproses");
Sisa=pulsa-100000
Println (“Sisa pulsa anda : “+sisa);
break;
else
if (step2==2);
Println ("");
Else;
Println ("Kode yang anda masukkan tidak
tersedia");
Break;
else
if (step1==3);
Println
("paket layanan data sebesar 6GB, selama 30 hari");
Println
("Tarif: Rp. 49.000,-");
Println
("1. Daftar Paket");
Println
("2. Kembali");
Writeln
("Pilihan :");
Writeln
("Pilihan :");
Read
(step2);
if (step2==1);
if (pulsa<49000);
Println
("Maaf pulsa anda tidak mencukupi");
break;
else;
Println
("Terima kasih, pilihan anda sedang diproses");
Sisa=pulsa-49000;
Println (“Sisa pulsa anda : “+sisa);
break;
else if (step2==2);
Println ("");
Else;
Println ("Kode yang anda masukkan tidak
tersedia");
Break;
else
if (step1==4);
Println
("paket layanan data sebesar 700MB, selama 30 hari");
Println
("Tarif: Rp. 25.000,-");
Println
("1. Daftar Paket");
Println
("2. Kembali");
Println
("");
Writeln
("Pilihan :");
Read
(step2);
if (step2==1);
if (pulsa<25000);
Println
("Maaf pulsa anda tidak mencukupi");
break;
else;
Println
("Terima kasih, pilihan anda sedang diproses");
Sisa=pulsa-25000;
Println (“Sisa pulsa anda : “+sisa);
break;
else
if (step2==2);
Println ("");
Else;
Println ("Kode yang anda masukkan tidak tersedia");
Break;
else
if (step1==5);
Println
("paket layanan data sebesar 100MB, selama 7 hari");
Println
("Tarif: Rp. 10.000,-");
Println
("1. Daftar Paket");
Println
("2. Kembali");
Writeln
("Pilihan :");
Read
(step2);
if (step2==1);
if (pulsa<10000);
Println
("Maaf pulsa anda tidak mencukupi");
break;
else;
Println
("Terima kasih, pilihan anda sedang diproses");
Sisa=pulsa-10000;
Println (“Sisa pulsa anda : “+sisa);
break;
else;
Println ("");
else if (step2==2);
Println ("");
Else;
Println
("Kode yang anda masukkan tidak tersedia");
Break;
Else;
Println (Layanan tidak tersedia");
Writeln (“Tekan 0
untuk melakukan transaksi lain: “);
Read (lagi)
Lagi++
While
(lagi<=1);
END
Flowchart
Screenshot Program
Tidak ada komentar:
Posting Komentar