Contoh program pada QBasic

(1)
cls
rem PROGRAM BIODATA
input "masukkan nama anda :", nama$
input "masukkan kelas anda :", kelas$
print "nama anda adalah:", nama$
print "kelas anda adalah:", kelas$
end

(2)cls
rem LUAS SEGITIGA
input "masukkan alas :", A
input "masukkan tinggi :", T
LUAS = (A*T)/2
print "LUAS SEGITIGA :", LUAS
end