A2. Algortitma

           a. Pseudocode

               Pseudocode PaketInternetan

{ Pseudocode ini menerangkan skema pembelian paket internet. Agar pembaca dapat memahami skema/alur pembelian paket internet. }

Deklarasi

a, b, pass, kode, kembali       3, sisa_pulsa, o=10000, p=300000, q=8000, r=240000, s= 3000, t=70000: Byte

pass          (int)(Math.random()*1000

status       : Boolean         False

Deskripsi

Start

do

write("MASUKKAN KODE : ")

read(“kode”)

if (kode = pass) then

do

writeln("1. Internetan Groovy")

writeln("2. Paket Juara      ")

writeln("3, Paket Murah      ")

do

writeln("Pilihan anda : ")

read(b)

while (status)

writeln (“Kode verifikasi”)

write (“Masukkan kode verifikasi : “)

read (kode)

read(a)

if(a=1) then

writeln("Paket Internetan Groovy")

writeln("1. Beli Paket Harian")

writeln("2. Beli Paket Bulanan")

writeln("Pilihan anda : ")

read(b)

if (b=1) then

writeln("Terima kasih telah melakukan pembelian paket Internetan Groovy Harian, tunggu konfirmasi selanjutnya")

sisa_pulsa = pulsa – o

Writeln (“Sisa pulsa anda + sisa_pulsa +”)

else if (b=2)

writeln("Terima kasih telah melakukan pembelian paket Internetan Groovy Bulanan, tunggu konfimasi selanjutnya")

sisa_pulsa = pulsa – p

Writeln (“Sisa pulsa anda + sisa_pulsa +”)

else if (a=2) then

writeln("Paket Juara 3G dengan harga 8.000 per hari plus 10 sms gratis dan harga 100.000,00 per bulan plus 100 sms gratis")

writeln("1. Beli Paket Harian")

writeln("2. Beli Paket Bulanan")

if (b=1) then

writeln("Terima kasih telah melakukan pembelian paket Internetan Juara, tunggu konfirmasi selanjutnya")

sisa_pulsa = pulsa – q

Writeln (“Sisa pulsa anda + sisa_pulsa +”)

else if (b=2) then

writeln("Terima kasih telah melakukan pembelian paket Internetan Groovy Bulanan, tunggu konfimasi selanjutnya")

sisa_pulsa = pulsa – r

Writeln (“Sisa pulsa anda + sisa_pulsa +”)

else if (a=3) then

writeln("Paket Murah internetan dari jam 00.00-09.00 WIB dengan harga per hari 3.000,00 dan per bulan 40.000,00")

writeln("1. Beli Paket Harian")

writeln("2. Beli Paket Bulanan")

writeln("Pilihan anda : ")

read(b)

if (b=1) then

writeln("Terima kasih telah melakukan pembelian paket Internetan Murah Harian, tunggu konfirmasi selanjutnya")

sisa_pulsa = pulsa – s

Writeln (“Sisa pulsa anda + sisa_pulsa +”)

else if (b=2) then

writeln("Terima kasih telah melakukan pembelian paket Internetan Murah Bulanan, tunggu konfimasi selanjutnya")

sisa_pulsa = pulsa – t

Writeln (“Sisa pulsa anda + sisa_pulsa +”)

write (“Masukkan Kode”)

while (status)

else

writeln (“Conection Error”)

while (status)

End