Berikut contoh sebuah algoritma QBasic dengan menggunakan empat statement dasar.
REM Luas Bangun Datar Persegi Panjang
PRINT "Menghitung Luas Persegipanjang"
SLEEP 3
PRINT "Rumus luas persegipanjang L = p * l
DIM p AS INTEGER
DIM l AS INTEGER
p = 12
l = 5
LET a = p * l
PRINT "Luas persegipanjang dengan p = 12 dan l = 5 adalah "; a
END
0 Comments