Contoh Program Sederhana QBasic

Posted: 6 Desember 2011 in Uncategorized

Cls

10 DATA 70,75

20 READ x,y

30 LET c = (x+y)/2

40 PRINT “NILAI PERTAMA :”;x

50 PRINT “NILAI KEDUA :”;y

60 PRINT “TOTAL NIALI :”; c

70 IF c >= 70 THEN GOTO 90

80 PRINT “ANDA TIDAK LULUS”

90 PRINT “ANDA LULUS”

95 END

 

 

KET :

Data : Memberikan nilai variable pada statement READ letaknya di bagian mana saja dari program

Read : Membaca nilai variable pada statement DATA

Let : Memberikan harga suatu variable

If : Suatu statement yang biasa diguanakan untuk melaksanakan proses berdasarkan suatu kondisi tertentu( percabangan bersyarat).

Goto : melompat ke baris yang dituju.

Print : Adalah statement yang bisa digunakan untuk meberikan perintah kepada computer agar mencetak ataupun menegeluarkan hasil yang telah diproses.

End : Mengakhiri program

10-95: hanya sebagai line number dan terserah mauada ataupun tidak. Tetapi karena pada program ada perintah goto maka line number tersebut harus ada untuk pemberian nomornya terserah yang buat.

 

Logikanya : karena datanya sudah langsung di masukkan kedalam program tanpa di input lagi dan datanya itu lebih besar dengan 70 maka program akan menjalan perintah yang ada pada line number 70 dimana perintah tersebut menyatakan bahwa apbila/jika nilai dari lebih besar atau sama dengan 70 maka outputnya menuju 90 yaitu “anda Lulus” dan selebihnya atau selain dari itu menuju 80 “anda Tidak Lulus”.

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s