Listing Basic

Listing Basic merupakan instruksi dasar untuk menjalankan program dengan menggunakan qbasic. berikut ini ada beberapa contoh listing basic yang akan sering kita gunakan :

1. CLS (berfungsi untuk membersihkan layar ketika instruksi ini dijalankan)
2. PRINT (berfungsi untuk mencetak keluaran dari program ketika instruksi ini dijalankan)
3. INPUT (berfungsi untuk menginput suatu data yang selanjutnya akan diproses pada instruksi berikutnya)
4. END berfungsi untuk mengakhiri atau menghentikan program)

Selanjutnya adalah beberapa contoh operator dasar pada pemrograman basic, berikut ini adalah contohnya :

1. Operator aritmatika : Operator yang mengimplementasikan proses aritmatika atau matematika.
Nach urutan operator dari aritmatika dalam Pemrograman adalah sebagai berikut:
1. Perkalian ( * )
2. Pembagian ( / )
3. Modulasi ( mod ) --> Sisa dari hasil bagi
4. Tambah ( + )
5. Kurang ( - )
Contoh :
5 mod 6 / 3 + 2 maka cara mengerjakannya :
1. 6 dibagi 3
2. 5 mod hasil dari nomer 1
3. hasil dari nomer 2 ditambah 2
Maka ouput dari perhitungan itu bila ditulis dengan bahasa pemrograman adalah: 3

2. Operator Relasi : Operator yang mengimplementasikan besaran suatu variabel.
Nach contoh dari operator relasi adalah:
1. Sama dengan ( = )
2. Tidak sama dengan ( <> )
3. Lebih dari ( > )
4. Kurang dari ( < ) 5. Lebih dari sama dengan ( >= )
6. Kurang dari sama dengan ( <= )
Nach untuk contohnya saya tidak perlu karena semua pasti sudah mengerti.

3. Operator Boolean: Operator yang menyatakan suatu kondisi tertentu.
Macam dari operator boolean ini adalah:
1. OR --> Prinsip kerja aliran listrik Paralel
2. AND --> Prinsip kerja aliran listrik Seri

Dari contoh-contoh di atas,
Berikut saya sajikan contoh "listing basic" untuk mencari luas bangun datar (persegi,segitiga,lingkaran dan layang-layang)
Untuk mencobanya silakan ketik listingnya di program qbasic seperti contoh di bawah ini :
CLS
PRINT "NAMA : MUHAMMAD YUSNAEDI"
PRINT "NIM : D41109017"
PRINT "WELCOME TO MY FIRST PROGRAM"
INPUT "PRESS 1 TO START"; A
IF A = 1 THEN GOTO 1
IF A < 1 THEN GOTO 7
IF A > 1 THEN GOTO 7
1 CLS
PRINT "PROGRAM PERHITUNGAN LUAS BANGUN DATAR"
PRINT "1.PERSEGI 2.SEGITIGA 3.LINGKARAN 4.LAYANG-LAYANG"
2 INPUT "BANGUN DATAR YANG AKAN ANDA CARI LUASNYA ADALAH (1/2/3/4)";X
IF X = 1 THEN GOTO 3
IF X = 2 THEN GOTO 4
IF X = 3 THEN GOTO 5
IF X = 4 THEN GOTO 6
IF X < 1 THEN GOTO 7
IF X > 4 THEN GOTO 7
3 CLS
PRINT "ANDA AKAN MENCARI LUAS PERSEGI"
INPUT "MASUKKAN PANJANG SISI PERSEGI"; S
LP = S * S
PRINT "LUAS PERSEGI ADALAH"; LP
INPUT "PRESS 9 TO BACK AND 0 TO EXIT"; Q
IF Q = 9 THEN GOTO 1
IF Q = 0 THEN GOTO 7
4 CLS
PRINT "ANDA AKAN MENCARI LUAS SEGITIGA"
INPUT "MASUKKAN ALAS SEGITIGA"; A
INPUT "MASUKKAN TINGGI SEGITIGA"; T
LS = (A * T) / 2
PRINT "LUAS SEGITIGA ADALAH"; LS
INPUT "PRESS 9 TO BACK AND 0 TO EXIT"; Q
IF Q = 9 THEN GOTO 1
IF Q = 0 THEN GOTO 7
5 CLS PRINT "ANDA AKAN MENCARI LUAS LINGKARAN"
INPUT "MASUKKAN JARI-JARI LINGKARAN"; R
LL = (22/7) * R
PRINT "LUAS LINGKARAN ADALAH"; LL
INPUT "PRESS 9 TO BACK AND 0 TO EXIT"; Q
IF Q = 9 THEN GOTO 1
IF Q = 0 THEN GOTO 7
6 CLS
PRINT "ANDA AKAN MENCARI LUAS LAYANG-LAYANG"
INPUT "MASUKKAN PANJANG DIAGONAL I LAYANG-LAYANG"; D1
INPUT "MASUKKAN PANJANG DIAGONAL II LAYANG-LAYANG"; D2
LY = (D1 * D2) / 2
PRINT "LUAS LAYANG-LAYANG ADALAH"; LY
INPUT "PRESS 9 TO BACK AND 0 TO EXIT"; Q
IF Q = 9 THEN GOTO 1
IF Q = 0 THEN GOTO 7
7 END

Setelah menulis Program diatas, tekan F5 untuk Running. Masukkan inputan yang berbeda-beda untuk menguji kebenaran logika dan penulisan Program kita.

Tinggalkan komentar untuk perbaikan posting-posting berikutnya.