Membuat Program Case Biodata, Bilangan Ganjil Genap, Piramid, Manipulasi Data, Exit



1. Membuat Case 1. Biodata
     1. Buka terlebih dahulu program Qbasicnya
      2. Ketikan Script Seperti ini



Keterangan :
-  DIM A AS INTEGER : maksudnya adalah variabel A bersifat INTEGER atau angka
- CLS                             : berfungsi agar pada saat di Print tidak terjadi pengulangan Kata
                                        yang mengakibatkan hasil print bertumpuk dengan hasil print
                                        sebelumnya.
- PRINT                         : berfungsi untuk menampilkan kata yg ingin dibuat pada saat program 
                                         dijalankan, contohnya PRINT “MENU” berarti kita akan menampilkan
                                         kata MENU
- INPUT “PILIH MENU :”, A : maksudnya adalah pada saat program dijalankan kita disuruh
                                                    memilih Menu case mana yang ingin dijalankan dengan
                                                    memasukan nomer angka case
- STRING                      : maksudnya bersifat angka dan huruf contohnya, DIM NAMA AS STRING, 
                                        maksudnya nama bisa diisini angka dan huruf, begitu juga dengan NPM, Kelas,
                                        dan Grade
- INTEGER                    : maksudnya bersifat angka contohnya, DIM UAS AS INTEGER, maksudnya
                                         Nilai  UAS bersifat Angka, begitu juga dengan Nilai UTS.
- LET G = (UAS + UTS) / 2 maksudnya adalah rumus dari Grade Nilai UAS + Nilai UTS   
  dan dibagi 2, yang kemudian akan menghasilkan Grade berupa huruf A, B, C, D, dan E  
  sesuai Total nilainya.
- IF G > 90 THEN
  GRADE$ “A”
  maksudnya jika total nilai (variabel G) lebih besar dari 90 akan menghasilkan Grade A, 
  begitu seterusnya
- IF UCASE$(cobalagi$) = “Y” THEN
  GOTO ulangilagi maksudnya adalah, ketika kita sudah menjalankan suatu case atau menu,   
 
kita akan diminta untuk mengulanginnya lagi atau selesai.

2. Kemudian Enter dan ketikan script seperti dibawah ini untuk membuat Case 2 Ganjil Genap


Keterangan :
- INPUT “MASUKKAN BILANGAN:”, BIL maksudnya adalah pada saat program
  dijalankan dan memilih case 2 maka ada kata-kata MASUKAN BILANGAN
- IF BIL = 0 THEN
  PRINT “BILANGAN NOL” maksudnya adalah jika bilangan yang kita masukan 0 maka
  akan keluar kata kata NOL
- ELSEIF BIL MOD 2 = 0 THEN
  PRINT “BILANGAN GENAP” maksudnya adalah kecuali jika bilangan yang dimasukkan  
  habis dibagi 2 maka akan keluar kata kata BILANGAN GENAP
- ELSE
  PRINT “BILANGAN GANJIL” maksudnya tapi jika bilangan sebaliknya (tidak habis  
  dibagi 2 maka kata kata yang keluar BILANGAN GANJIL

3. Kemudian Enter dan ketikan script seperti dibawah ini untuk membuat Case 3. Piramid


Keterangan :
- INPUT “MASUKKAN BILANGAN:”, B maksudnya kita disuruh memasukan bilangan, dan disini  
   menggunakan variabel B
- B = B
  U = B
  FOR I = 1 TO B
  PRINT TAB(U); maksudnya adalah PRINT TAB(U); untuk membuat kumpulan angka
  berbentuk sebuah piramid
- dan END adalah sebuah perintah untuk mengakhiri sebuah program

4. Kemudian Enter dan ketikan script seperti dibawah ini untuk membuat Case 4. Manipulasi Data dan Case 5. EXIT



Keterangan :
- INPUT “MASUKKAN NAMA ANDA:”, S$
  Maksudnya adalah pada saat program dijalankan pertama kali maka kita diminta untuk
  memasukan NAMA sesuai keinginan
- LET J$ = LEFT$(S$, 5)
  LET K$ = RIGHT$(S$, 5)
  LET L$ = MID$(S$, 4 ,8)
  LET M  = LEN (S$)
  Maksudnya adalah
     - variabel J$ akan menghasilkan 5 huruf (karakter) dari sebelah kiri pada nama yang
        diinput
     - variabel K$ akan menghasilkan 5 huruf (karakter ) dari sebelah kanan pada nama yang
       diinput
     - variabel L$ akan menghasilkan 8 huruf (karakter) dari posisi ke empat pada nama yang
       diinput
     - variabel M akan menghitung jumlah karakter pada nama yang diinput   
- PRINT “5 HURUF DARI KIRI ADALAH :”, R$
  PRINT “5 HURUF DARI KANAN ADALAH :”, S$
  PRINT “8 HURUF DARI POSISI KE EMPAT :”, T$
  PRINT “PANJANG NAMA ANDA ADALAH :”, M
  END
  Maksudnya adalah pada saat program dijalankan maka akan menampilkan kata-kata seperti
  ini :
  5 HURUF DARI KIRI ADALAH : hasil dari variabel J
  5 HURUF DARI KANAN ADALAH : hasil dari variabel K
  8 HURUF DARI POSISI KE EMPAT : hasil dari variabel L
  PANJANG NAMA ANDA ADALAH : hasil dari variabel M
- PRINT “SEE YOU” maksudnya adalah jika kita memilih case 5 akan keluar kata kata SEE YOU
- END SELECT maksudnya adalah untuk mengakhiri perintah CASE

5. Kemudian Tekan F5 untuk menjalankan programnya, dan ini hasilnya



6. Dan jalankan Case satu persatu, maka hasilnya akan seperti ini :

CASE 1. BIODATA


CASE 2. BILANGAN GANJIL GENAP


CASE 3. PIRAMID


CASE 4. MANIPULASI DATA


CASE 5. EXIT
Share This Article Facebook +Google Twitter Digg Reddit