Selasa, 14 November 2017

Cara Membuat Program Looping Menggunakan QBasic

      Pada postingan kali ini saya akan menjelaskan cara membuat program looping, kita akan membuat sebuah program laporan "Daftar Gaji Pokok Pegawai" menggunakan QBasic yang akan menghasilkan output seperti gambar dibawah ini:



Berikut adalah cara membuat program di atas:

1. Buka aplikasi QBasic kemudian klik file -> new

2. Kemudian buat program di QBasic  seperti gambar dibawah ini:


3. Untuk penjelasan program diatas, yang pertama kali kita lakukan yaitu mendeklarasikan variabel-variabelnya untuk setiap data dengan menggunakan perintah DIM, nama variabel yang digunakan bebas sebagai berikut:

         Nama = NAMA$
         Gaji Pokok = GAJIPOKOK
         Tunjangan = TUNJ
         Total Gaji = TOTALGAJI

    Data yang menggunakan $ adalah data string yang berarti data yang tidak dapat dilakukan operasi matematis.

4. Setelah itu K = 1 berfungsi untuk menetapkan harga awal variabel K yang akan digunakan untuk mengurutkan data.

5. Untuk memasukkan input pada program, ketiklah pada QBasic INPUT "Nama =", NAMA$(K) bertujuan supaya program dapat menginput data nama sesuai yang diinginkan dan memasukkannya pada variabel NAMA$ pada urutan ke K.

6. Untuk melakukan input pada gaji pokok dan tunjangan yaitu dengan mengetikkan INPUT  "Gaji Pokok ="GAJIPOKOK(K) dan INPUT "Tunjangan ="TUNJ(K).

7. Total Gaji adalah hasil penjumlahan dari gaji pokok ditambah dengan tunjangan untuk itu dilakukan perhitungan pada QBasic  dengan cara mengetikkan TOTALGAJI(K) =GAJIPOKOK(K) + TUNJ(K), untuk harga gaji ke K.

8. Program yang akan kita buat hanya terdiri 5 data, jadi kita akan mengetikkan K = K + 1, supaya nilai K bertambah 1 pada setiap data, supaya diinput dapat berhenti pada data ke 5 diketikkan  IF K = 5 THEN 20 ini berfungsi supaya jika K sudah mencapai angka 5 maka program akan melanjutkan ke baris 20

9. Kita akan mengetikkan perintah GOTO 10 supaya jika harga K belum mencapai 5 maka program akan kembali ke baris 10, dimana baris 10 kita tetapkan pada codding input "Nama" untuk harga K yag berbeda.

10. Jika harga K telah mencapai 5 maka program akan melanjutkan ke baris 20, dimana dalam baris 20 ini kita tuliskan perintah mencetak dilayar yaitu PRINT "Daftar Gaji Pegawai" dan PRINT "Nama", "Total Gaji". Penggunaan koma digunakan untuk member tabulasi.

11. Ketikkan PRINT "-------------------------------" yang digunakan untuk mencetak garis pemisah pada layar.

12. FOR K = 1 TO 5 digunakan supaya  data dimulai  dari harga K = 1 sampai harga K = 5, sehingga  ketika kita melakukan perintah cetak PRINT "NAMA$(K), TOTALGAJI(K) yang tercetak adalah input dari variabel NAMA$ dan TOTALGAJI untuk harga K = 1 sampai harga K = 5.

13. NEXT K diperuntukkan untuk perulangan sampai K mencapai 5.

14. Ketika program telah selesai, ketikkan END untuk mengakhiri program pada QBasic. Jalankan program dengan menekan Shift + F5 pada keyboard, kemudian masukkan Nama, Gaji Pokok dan Tunjangan sebanyak 5 data.
      Output yang akan keluar seperti gambar dibawah ini:

"Semoga program yang saya buat bisa bermanfaat bagi anda dan kita semua.
Cobalah untuk belajar sesuatu tentang segala sesuatu dan segala sesuatu tentang sesuatu.
Teruslah berusaha jangan pantang menyerah (Impossible Is Nothing)."

Tugas Bukti Audit

  UNIVERSITAS GUNADARMA FAKULTAS ILMU KOMPUTER DAN TEKHNOLOGI INFORMASI "TUGAS BUKTI AUDIT" Disusun Oleh :  Nama : Zahrah Nindisya...