17/07/2015

Program QBASIC Menghitung Luas dan Volume Bola dan Kerucut (Laporan Akhir Lab. TI Dasar)

Nama  File : Laporan.bas
Nama Program : QBASIC
Input / deklarasi : DIM, AS SINGLE, CLS, INPUT, PRINT, END

LISTING PROGRAM :
DIM r AS SINGLE
DIM t AS SINGLE
CLS
INPUT "Masukan jari - jari lingkaran   :", r
PRINT "Luas Lingkaran :", (3.14 * (r ^ 2))
PRINT "Volume Bola    :", (4 / 3 * 3.14 * (r ^ 3))

INPUT "Masukan Tinggi Kerucut          :", t
PRINT "Volume Kerucut :", (1 / 3 * 3.14 * (r ^ 2) * t)
END
LOGIKA PROGRAM :
Program yang dipakai ini adalah salah satu program bahasa dari pemograman basic yaitu QBASIC. Operasi progam ini bertujuan untuk mencari tahu Luas Lingkaran, Volume Bola, dan Volume Kerucut. Penjelasan program : pertama kita harus membuat struktur program BASIC yang diawali dengan pendeklarasian variabel atau pendefinisian variabel. Untuk pendeklarasian pertama menggunakan DIM r AS SINGLE dengan tujuan untuk memasukan jari – jari lingkaran, sedangkan DIM t AS SINGLE untuk menuliskan tinggi kerucut. Tipe data variabel yang digunakan pada setiap pendeklarasian adalah SINGLE karena data yang dimasukan merupakan floating point yang dapat menampung bilangan real (pecahan).

Kemudian masukan statement CLS yang berjutujan membersihkan layar, setelah struktur pendeklarasian selesai selanjutnya adalah bagian tubuh program tempat meletakkan statement atau instruksi-intruksi untuk sebuah program. Pertama adalah memasukan perintah input yaitu INPUT "Masukan jari - jari lingkaran   :", r untuk memasukan jari – jari lingkaran pada program dan INPUT "Masukan Tinggi Kerucut          :", t yang berguna untuk memasukan tinggi kerucut sesuai dengan pendeklarasian sebelumnya.

Selanjutnya memasukan perintah – perintah output print untuk mencetak hasil pada program QBASIC. Seperti PRINT "Luas Lingkaran :", (3.14 * (r ^ 2)) untuk mencetak hasil perhitungan Luas Lingkaran pada program saat RUN dengan rumus yang sesuai, lalu ada PRINT "Volume Bola    :", (4 / 3 * 3.14 * (r ^ 3)) adalah untuk mencetak hasil penghitungan Volume Bola sesuai dengan rumus yang di masukan pada program QBASIC dan yang terakhir adalah PRINT "Volume Kerucut :", (1 / 3 * 3.14 * (r ^ 2) * t) yang merupakan rumus untuk mencetak hasil perhitungan sesuai dengan rumus volume kerucut.

Setelah bagian tubuh program tempat meletakkan statement atau instruksi-intruksi untuk sebuah program selesai, langkah terkhir adalah meletakan statement END yang merupakan akhir dari sebuah program. Save atau save as program QBASIC yang tadi telah dibuat kemudian klik RUN dan pilih start atau F5 yang terdapat di keyboard.

Pada program kita dapan memasukan jari – jari lingkaran dan juga memasukan tinggi kerucut,  setelah selesai dan menekan enter, kita dapat melihat hasil perhitungan dari luas lingkaran, volume bola, dan volume kerucut  yang terdapat pada screen program QBASIC yang telah di buat tadi.

HASIL PROGRAM QBASIC:

HASIL RUN PROGRAM QBASIC:



0 komentar :

Post a Comment