Apa itu QBasic?... pasti agan-agan pada bingungkan? nah,disini ane akan menjelaskan tentang QBasic.
Pada dasarnya Q-Basic, Q=Quick (cepat), dan Basicnya adalah Beginners’ All-purpose Symbolic Instruction Code (sebuah kelompok bahasa pemrograman tingkat tinggi). Itu baru pengertian dasarnya. lebih jelasnya Qbasic adalah salah satu bahasa pemrograman yang menggunakan bahasa basic, Qbasic sendiri singkatan dari Quick Basic yang merupakan salah satu produk Microsoft. Qbasic cukup baik untuk belajar dasar pemrograman. Bahasa Qbasic ini dapat dipelajari dari internet dan program
Tipe data pada Qbasic :
Tipe data numerik integer
Tipe Ukuran memory jangkauan nilai
Byte 1 byte 0 .. 255
Shortint 1 byte -128 .. 127
Integer 2 byte -32768 .. 32767
Word 2 byte 0 .. 65535
Longint 4 byte -2147483648
Tipe data numerik real
Tipe konstanta numerik real berkisar dari 1E-38 sampai dengan 1E+38, nilai numerik
real menempati memory sebesar 6 byte.
Tipe data karakter
Nilai karakter berupa sebuah karakter yang ditulis diantara tanda petik tunggal.
Tipe data string
Berupa kumpulan beberapa karakter yang terletak diantara tanda petik tunggal.
Tipe data boolean.
Tipe data ini mempunyai dua nilai yaitu true & false.
STATEMEN KONDISI
- Goto (kondisi tak bersyarat),seperti telah dijelaskan diatas
- if then + goto (kondisi bersyarat, hanya satu syarat)
- if then + else (kondisi bersyarat dengan 2 atau lebih syarat
- select case : menyeleksi atau mengeksekusi kondisi yang ditest
STATEMEN PERULANGAN
- For .. next
Mengulangi suatu perintah / instruksi dalam jumlah yang telah ditentukan, serta besar kenaikannya.
- Do while … loop
Mengulangi perintah selama suatu kondisi memenuhi syarat (true) dan berhenti bila tidak lagi memenuh syarat (false)
- Do until … loop
mengulangi instruksi selama kondisi tidak memenuhi syarat (false) dan berhenti bila kondisi memenuhi syarat (true)
- While … wend
sama dengan do while … loop tetapi bentuk penulisannya hanya satu dan tidak memiliki perintah exit untuk menghentikan proses yang berulang sebelum berakhir
Pada dasarnya Q-Basic, Q=Quick (cepat), dan Basicnya adalah Beginners’ All-purpose Symbolic Instruction Code (sebuah kelompok bahasa pemrograman tingkat tinggi). Itu baru pengertian dasarnya. lebih jelasnya Qbasic adalah salah satu bahasa pemrograman yang menggunakan bahasa basic, Qbasic sendiri singkatan dari Quick Basic yang merupakan salah satu produk Microsoft. Qbasic cukup baik untuk belajar dasar pemrograman. Bahasa Qbasic ini dapat dipelajari dari internet dan program
Tipe data pada Qbasic :
Tipe data numerik integer
Tipe Ukuran memory jangkauan nilai
Byte 1 byte 0 .. 255
Shortint 1 byte -128 .. 127
Integer 2 byte -32768 .. 32767
Word 2 byte 0 .. 65535
Longint 4 byte -2147483648
Tipe data numerik real
Tipe konstanta numerik real berkisar dari 1E-38 sampai dengan 1E+38, nilai numerik
real menempati memory sebesar 6 byte.
Tipe data karakter
Nilai karakter berupa sebuah karakter yang ditulis diantara tanda petik tunggal.
Tipe data string
Berupa kumpulan beberapa karakter yang terletak diantara tanda petik tunggal.
Tipe data boolean.
Tipe data ini mempunyai dua nilai yaitu true & false.
STATEMEN KONDISI
- Goto (kondisi tak bersyarat),seperti telah dijelaskan diatas
- if then + goto (kondisi bersyarat, hanya satu syarat)
- if then + else (kondisi bersyarat dengan 2 atau lebih syarat
- select case : menyeleksi atau mengeksekusi kondisi yang ditest
STATEMEN PERULANGAN
- For .. next
Mengulangi suatu perintah / instruksi dalam jumlah yang telah ditentukan, serta besar kenaikannya.
- Do while … loop
Mengulangi perintah selama suatu kondisi memenuhi syarat (true) dan berhenti bila tidak lagi memenuh syarat (false)
- Do until … loop
mengulangi instruksi selama kondisi tidak memenuhi syarat (false) dan berhenti bila kondisi memenuhi syarat (true)
- While … wend
sama dengan do while … loop tetapi bentuk penulisannya hanya satu dan tidak memiliki perintah exit untuk menghentikan proses yang berulang sebelum berakhir
Nih buat agan-agan n sista-sista yang mau download QBasic buka aja linknnya : http://www.zid*du.com/download/146894...sic11.rar.html Hapus tanda * nya |
OUTPUTNYA: codingnya: CLS I AS INTEGER PRINT "Rizki", "1dc01", "Depok" GOSUB 10 PRINT "Fauzi", "1dc01", "Bogor" GOSUB 10 END 10 PRINT STRING$<35, "--"> RETURN |
OUTPUNYA: menu:biodata, luas segitiga, deret, exit pil 1.biodata pil 2.Luas Segitiga pil 3.Deret pil 4.exit pada pilihan exit maka program akan langsung keluar "Press any key to continue" Codingnya: 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 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 INPUT "Masukan Nilai u=", u FOR x = 1 TO u FOR y = 1 TO x COLOR 5 PRINT y: NEXT y NEXT x CASE 4 GOTO 500 END SELECT 500 END |
QBasic, contoh program menu Nama, Kelas, NPM, dan CETAK PROGRAM: OUTPUTNYA: pil 1 pil 2 pil 3 pil 4 sedangkan jika kita pil 5 maka program akan langsung keluar "Press any key to continue" codingnya: CLS DIM P AS INTEGER 10 PRINT "Menu" PRINT "1.Input Nama" PRINT "2.Input NPM" PRINT "3.Input Kelas" PRINT "4.Cetak Semua" PRINT "5.EXIT" INPUT "Pilihan Anda?", P SELECT CASE P CASE 1 CSL DIM NM AS STRING INPUT "Nama :", NM GOSUB 10 CASE 2 CLS DIM NPM AS LONG INPUT "NPM :", NPM GOSUB 10 CASE 3 CLS DIM KLS AS STRING INPUT "Kelas :", KLS GOSUB 10 CASE 4 CLS PRINT "Nama :"; NM PRINT "NPM :"; NPM PRINT "Kelas :"; KLS GOSUB 10 CASE 5 CLS PRINT "Exit" END SELECT END |
PROGRAM SEGITIGA TERBALIK
PROGRAM
OUTPUTNYA:
Keterangan :
Saat menjalankan program, maka kita akan diminta memasukan angka, lalu akan muncul symbol *(karena di program yang di print adalah “*”) sebanyak angka yang kita masukan.
CODINGNYA:
CLS
INPUT “Masukkan Nilai: “, A
FOR B = A TO 1 STEP -1
FOR C = B TO 1 STEP -1
PRINT “*”;
NEXT
NEXT B
END
MAU TANYA NIH GAN, ADA CONTOH PEMROGRAMAN QBASIC DIMANA 1 POROGRAM ITU TERDAPAT 10 APLIKASI YANG MEWAKILI SELURUH STATEMENT GAN ? BUAT REFERENSI GAN..
BalasHapusMOHON PENCERAHANNYA ^_^
boleh minta tlong seputar program QB ndag pak???sdang bgung nie
BalasHapusboleh... bingung knapa??
Hapus