Program Games Perulangan

B. Program Games Perulangan
B1. Deskripsi Program
      Dalam games ini kami menerapkan penggunaan struktur kontrol java yang melibatkan perulangan dan percabangan. Games ini berisikan dua pertanyaan, dan jika jawaban yang diinput benar maka akan keluar typography sesuai jawaban yang benar. Jika salah akan keluar typography bertuliskan GAME OVER.

B2. Algoritma
B2.1 Pseudocode

Algoritma Game_Tebak­_Tranportasi 

{membuat system game pengulangan}

Deklarasi

ans1, ans2, ans3, jml1=6, jml2=6 = Int

Deskripsi

Begin

Writeln ("Alat transportasi ada yang memiliki roda 4: ")

Writeln ("1. Sepeda motor")

Writeln ("2. bajaj")

Writeln ("3. mobil")

Writeln ("Jawaban Anda : ")

Read (ans1)

If (ans 1 == 1)

Writeln ("Maaf")

Writeln ("Jawaban anda SALAH !!!")

Writeln (“gambar bertuliskan game over”)

Else if (ans1 == 2)

Writeln ("Maaf")

Writeln ("Jawaban anda SALAH !!!")

Writeln (“gambar bertuliskan game over”)

Else if (ans1 == 3)

do

Writeln ("gambar mobil")

Jml1 --

While (jml1>0)

Writeln ("Selamat")

Writeln ("Jawaban anda BENAR !!!")

Writeln ("Apakah anda ingin lanjutkan permainan?")

Writeln ("1. ya")

Writeln ("2. tidak")

Writeln ("awaban Anda : ")

Read (ans2)

If (ans2 == 2)

Writeln ("Trimakasih ")

Writeln ("Telah bermain di Game Tebak Tranportasi")

Writeln ("gambar hati")

Else if (ans2 == 1)

Writeln ("Alat transportasiapa yang memiliki gerbong: ")

Writeln ("1. Kereta")

Writeln ("2. Pesawat")

Writeln ("3. Kapal")

Writeln ("Jawaban Anda : ")

Read (ans3)

If (ans3 == 1)

Writeln ("gambar kepala kereta")

do

Writeln ("gambar gerbong")

Jml2++

While (jml2 > 0)

Writeln ("Selamat")

Writeln ("Jawaban anda BENAR !!!")

Writeln ("Trimakasih ")

Writeln ("Telah bermain di Game Tebak Tranportasi")

Else if (ans3 == 2)

Writeln ("Maaf")

Writeln ("Jawaban anda SALAH !!!")

Writeln (“gambar bertuliskan game over”)

Else if (ans3 == 3)

Writeln ("Maaf")

Writeln ("Jawaban anda SALAH !!!")

Writeln (“gambar bertuliskan game over”)

Else

Writeln ("Error")

Else

Writeln ("Error")

Else

Writeln ("Error")

End

B2.1 Flowchart

B3. Console

Program Provider Pulsa

A. Program Provider Pulsa
A1. Deskripsi program
       Program ini merupakan program selayaknya provider pulsa selayaknya kita sedang mengecek pulsa di *xxx#. Didalam program ini terdiri dari menu utama dan sub-sub menu seperti informasi pulsa, layanan m-banking dan layanan pembelian internet. Pembuatan program ini juga mengasah kemampuan kami dalam membuat listing dan menerapkan struktur kontrol di Java.

A2. Algoritma
A2.1. Pseudocode

Algoritma provider_pulsa

{Membuat sistem provider Pulsa}

Deklarasi

bank1, bank2, norek, pil1, pil2, pil3 = char

saldo : int <- 3000000

pulsa : int <- 100000

sisa1 : double <- 0

sisa2 = double

nominal : int <- 0

kode : int <- 808

Deskripsi

Begin

do

Writeln (“Kode Provider Anda adalah 808”)

Writeln (“Masukkan kode :”)

read (kode)

Writeln (“Kode yang Anda masukkan salah, ulangi input kode!”)

While (kode ! = 808)

Writeln (“Main Menu”)

Writeln (“1. Informasi Kartu”)

Writeln (“2. Layanan”)

Writeln (“Masukkan pilihan :”)

Read (pil1)

If (pil1 equals ("1"))

Writeln (“Informasi kartu Anda adalah :”)

Writeln (“Saldo : Rp. 100.000,-”)

Writeln (“Kuota Internet           : 1250 MB”)

Writeln (“Kuota SMS : 25 SMS”)

Writeln (“Masa aktif kartu berlaku hingga 3 Februari 2015”)

Writeln (“Terimakasih”)

Else if (pil1 equals ("2"))

Writeln (“Silahkan pilih layanan dibawah ini”)

Writeln (“1. m-Banking”)

Writeln (“2. Internet”)

Writeln (“Layanan yang dipilih :”)

Read (pil2)

If (pil2 equals ("1"))

Writeln (“Bank Anda :”)

Read (bank1)

Writeln (“Bank Tujuan :”)

Read (bank2)

Writeln (“No Rekening :”)

Read (norek)

Writeln (“Nominal :”)

Read (nominal)

If (saldo < nominal)

Writeln (“Maaf, proses transfer tidak dapat dilakukan karena saldo Anda kurang”)

Else

Sisa1 ß saldo - nominal

Writeln (“Transfer sukses! Anda telah mentransfer sejumlah ", nominal, " ke bank ", bank2, ". Saldo rekening Anda saat ini adalah ", sisa1, " rupiah”)

else

Writeln (“1. 500 MB : 250000”)

Writeln (“2. 1 GB : 500000”)

Writeln (“Layanan yang dipilih :”)

Read (Pil3)

If (pil3 equals("1"))

Writeln (“Pembelian kuota internet sukses! Total kuota internet Anda adalah 1750 MB”)

sisa2 = pulsa – 25000

Writeln ("Sisa pulsa Anda adalah " + sisa2)

Else if

Writeln (“Pembelian kuota internet sukses! Total kuota internet Anda adalah 2250 MB”)

sisa2 = pulsa – 50000

writeln (Sisa pulsa Anda adalah " + sisa2)

else

writeln ("Kode yang Anda masukkan tidak tersedia")

else

Writeln ("Kode yang Anda masukkan tidak tersedia")

End

A2.2 Flowchart

A3. Console