Array QBasic

Pengertian Array Pada QBasic
Array adalah sekumpulan data yang menggunakan nama variabel yang sama. Tiap-tiap nilai dari array disebut sebagai elemen dan memiliki index. Setiap elemen array adalah sebuah variabel juga.

Bentuk Umum Array Pada QBasic

§  Array berdimensi satu
array satu dimensi adalah kumpulan elemen yang tersusun dalam suatu baris.  Bentuk umum : DIM NamaBarang$(50)
DIM NamaBarang(50) AS STRING
DIM Penyanyi(20) AS STRING * 25

§  Array berdimensi dua
Array dua dimensi adalah array yang dapat membantu dalam pemrograman apabila array satu dimensi tidak mencukupi dalam menghasilakan suatu solusi.array dua dimensi sebenarnya adalah array yang berisi array.

§  Array dimensi banyak
Sebuah array dimensi banyak atau multi-dimensional array didefinisikan sebagai sebuah array yang elemennya berupa array pula. Misal array B mempunyai M elemen berupa array pula, yang terdiri dari N elemen.

Contoh Program Array Pada QBasic
CLS
DIM a AS INTEGER
LOCATE 5, 23
PRINT "Menu"
LOCATE 6, 20
PRINT "1.Biodata"
LOCATE 7, 20
PRINT "2.Luas Segitiga"
LOCATE 8,20
PRINT "3.Deret"
LOCATE 9,20
PRINT "4.EXIT"
LOCATE 10, 20
INPUT "Mau Pilih Yang Mana?", a
SELECT CASE a
CASE 1
DIM Nama AS STRING, Kelas AS STRING, NPM AS INTEGER
INPUT "Nama =", Nama
INPUT "Kelas =", Kelas
INPUT "NPM =", NPM
PRINT
COLOR 1
PRINT "Nama ="; Nama
PRINT "Kelas ="; Kelas
PRINT "NPM ="; NPM
CASE 2
DIM alas, tinggi AS SINGLE
INPUT "Alas =", a
INPUT "Tinggi =", t
LET L = a * t / 2
COLOR 9
PRINT "Luas Segitiga = a * t / 2 =";L
CASE 3
DIM u AS INTEGER
PRINT
INPUT "Masukan Nilai u=", u
PRINT
FOR x = 1 TO u
FOR y = 1 TO x
COLOR 5
PRINT y:
NEXT y
PRINT
NEXT x
CASE 4
GOTO 500
END SELECT
500 END 

Nah itu dia sedikit tentang array pada qbasic berupa bentuk umum, dan contohnya juga. Itu yang bisa dishare hari ini semoga bermanfaat untuk yang membutuhkanya, dan semoga bisa dimengerti.

Terima Kasih.