Kondisi (IF) dan Pengulangan (looping) Pada Quick Basic

Kondisi dan Pengulangan Pada Quick Basic

oke saat ini saya sedang belajar pengulangan dan kondisi pada Qbasic
semoga pembelajaran ini bisa membantu kamu juga ya

oiya sebelum kamu baca artikel ini silakan baca sebelumnya di Qbasic  
untuk download aplikasi Qbasic dan BASIC dari Qbasic itu sendiri 

CLS (Clean Screen) untuk menghapus layar dari tampilan yang sebelumnya

DATA 52, 66 maksudnya adalah data yang diterima adalah angka 52, 56

dan di READ (baca) dengan variabel A, B

LET (Memberikan harga suatu variabel) jadi data 52, 66 akan di tambah dan dibagi 2 yang menghasilkan X

if (jika) X lebih besar dari 52 sampai 70

maka hasil yang diperoleh PRINT (cetakan) "MAHASISWA GAGAL"

tapi tidak terjadi bila angka yang dihasilkan 80,

karna akan menghasilkan PRINT (cetakan) "MAHASISWA LULUS"

dan di akhiri dengan END 

 

CLS (Clean Screen) untuk menghapus layar dari tampilan yang sebelumnya

INPUT (masukan) untuk variabel  "MASUKAN NILAI" dengan variable A numeric

if (jika) variable A lebih dari 70 menghasilkan

PRINT (cetakan) "MAHASISWA LULUS"

tapi bila dibawah 70 maka hasil PRINT (cetakan) "MAHASISWA TIDAK LULUS"

dan untuk mengakhiri semua variabel gunakan END IF

 

CLS (Clean Screen) untuk menghapus layar dari tampilan yang sebelumnya

pertama PRINT (cetak) untuk mencetak nama suatu variable ketika ditampilkan, misalnya MENU MAKANAN

Lalu ketik PRINT (cetak) untuk mencetak nama suatu variable pada MENU MAKANANNYA. Seperti 1.PECEL AYAM, 2. PECEL LELE, 3. NASI GORENG

Tidak lupa membuat Perintah INPUT (masukan) untuk variabel 

“MASUKAN PILIHAN (1,2,3)” dengan variable A

Lalu berikan perintah SELECT CASE untuk menyeleksi atau mengeksekusi kondisi yang ditest, sehingga perintah CASE ini berlaku untuk variable antara 1-3 saja

dan akhiri semua dengan END

dan jangan lupa END SELECT untuk mengakhiri SELECT CASE

beberapa pertanyaan dan jawabannya

1. Apa yang dimaksud dengan perulangan pada Qbasic?
2. Sebutkan dan jelaskan perulangan yang ada pada Qbasic!
3. Buat contoh program while-wend

 

1. Perulangan pada Qbasic merupakan suatu kondisi yang memenuhi untuk melakukan perulangan statement tertentu sampai kondisi tersebut tidak terpenuhi sehingga perulangan dihentikan. 

2. Jenis perulangan pada QBasic, yaitu :

- FOR … NEXT adalah untuk mengulangi suatu perintah (instruksi) dalam jumlah yang telah ditentukan, serta besar kenaikannya.

- DO WHILE … LOOP adalah untuk mengulangi suatu perintah (instruksi) selama   

While (suatu kondisi) memenuhi syarat (bernilai TRUE) dan akan berhenti apabila while tidak lagi memenuhi syarat (bernilai FALSE).

-WHILE …. WEND adalah sama dengan DO WHILE … LOOP, Tapi WHILE …WEND bentuk penulisannya hanya satu dan tidak memiliki perintah Exit untuk memberhentikan proses yang 

berulang-ulang sebelum berakhir.

3.

CLS

HITUNG = 0

WHILE HITUNG < 7

              PRINT HITUNG

              HITUNG = HITUNG + 1

WEND

PRINT  “PROSES PENGULANGAN SELESAI”

PRINT  “KARENA NILAI VARIABEL HITUNG =  “; HITUNG

END

Sumber :http://keripiku.blogspot.com/2010/10/kondisi-dan-pengulangan-pada-quick.html

download juga pdf'a di : 

AP1 SI M1 di http://www.mediafire.com/view/?xc511n9jj9t5upa

AP1 SI M2 di http://www.mediafire.com/view/?peehqiu48f8irf7

Posted in: