Membuat Program Untuk Mendeteksi Bilangan nol, genap dan ganjil dengan menggunakan QBASIC

·         Masukkan pada jendela QBASIC :

CLS

INPUT "masukan nilai=", a

IF a = 0 THEN

PRINT "adalah bilangan nol"

ELSEIF a MOD 2 = 0 THEN

PRINT "adalah bilangan genap"

ELSE

PRINT "adalah bilangan ganjil"

END IF

END

·         Maka akan keluar seperti gambar berikut

·         Lalu kita jalankan program yang sudah kita buat tadi dengan menekan F5 pada keyboard. Dan akan keluar jendela seperti gambar dibawah ini.

·     Lalu kita masukkan nilai nol maka program akan mencetak “adalah bilangan nol” karena kita telah memasukkan

INPUT "masukan nilai=", a

IF a = 0 THEN

PRINT "adalah bilangan nol"

Dimana INPUT “masukan nilai=”, a adalah nilai yang akan kita masukkan nanti pada program diibaratkan sebagai a. Maka IF a = 0 THEN yaitu jika kita memasukkan bilangan nol maka PRINT "adalah bilangan nol" program akan mencetak “adalah bilangan nol”.

·   Lalu kita masukkan nilai 4 pada program maka akan mencetak “adalah bilangan genap” karena kita telah memasukkan

ELSEIF a MOD 2 = 0 THEN

PRINT "adalah bilangan genap"

Dimana ELSEIF a MOD 2 = 0 THEN adalah bila nilai kondisi yang diperiksa bernilai benar atau terpenuhi, maka kondisi pertama dilaksanakan dan jika kondisi pertama salah maka pernyataan kedua yang dilaksanakan. Maka PRINT “adalah bilangan genap” yaitu bila kondisi sudah terpenuhi yaitu nilainya adalah bilangan genap maka program akan mencetak “adalah bilangan genap”.

·      Lalu kita akan memasukkan nilai 5 pada program maka akan mencetak “adalah bilangan ganjil karena

ELSEIF a MOD 2 = 0 THEN

PRINT "adalah bilangan genap"

ELSE

PRINT "adalah bilangan ganjil"

Dimana sama seperti kondisi sebelumnya yaitu bila nilai kondisi yang diperiksa bernilai benar atau terpenuhi, maka kondisi pertama dilaksanakan dan jika kondisi pertama salah maka pernyataan kedua yang dilaksanakan. Jadi bila nilai yang kita masukkan adalah bilangan ganjil maka program akan memeriksa apakah itu adalah kondisi pertama atau kedua sementara ganjil ada pada kondisi kedua jadi program akan langsung mencetak “adalah bilangan ganjil”.