18/07/2015

Soal dan Jawaban Laporan Pendahuluan (LP) Praktikum Lab. TI Dasar Minggu ke-5


Soal:
1. Jelaskan apa yang Anda ketahui tentang Sub Routin, Fungsi, dan Sub Program!
2. Bagaimana bentuk umum penulisan statement GO SUB, FUNCTION, dan SUB?
3. Buat sontoh program dari GO SUB, FUNCTION, dan SUB menggunakan bahasa BASIC!

Jawaban:
1. - Sub Routin
Sub routine merupakan kumpulan baris program yang dipanggil dengan statement GO SUB. Sub routine digunakan untuk memanggil baris program yang sering dipanggil. Hal ini lebih baik daripada menuliskan baris program yang sama berkali-kali.

- Fungsi
Fungsi adalah bagian dari program yang memberikan nilai keluaran. Nilai keluaran ini dapat disimpan pada sebuah variabel, dicetak atau dimanipulasi. Sebuah fungsi dapat dikatakan
sebagai ekspresi karena mengandung nilai. Jenis nilai keluaran berbeda-beda tergantung tipe
datanya.
Fungsi dibagi menjadi dua yaitu fungsi yang sudah disediakan BASIC dan fungsi yang
sengaja diciptakan user (user defined).

- Sub Program
Sub program adalah bagian dari program yang ditulis terpisah dari program utama. Berbeda
dengan fungsi sub program tidak mengembalikan nilai keluaran. Sub program sangat berguna
untuk menghindari penulisan barisan statement / instruksi yang berulang-ulang. Sub program
ini biasa juga disebut sebagai prosedur. Sama dengan fungsi dalam QBASIC sub program

ditulis secara terpisah dari modul utama.


2. - GO SUB
Bentuk umum GO SUB :
GO SUB no_baris

- FUNCTION
Bentuk umum untuk membuat suatu fungsi :
FUNCTION nama_fungsi [(parameter)]
   [blok_statement]
   nama_fungsi = ekspresi
   [blok_statement]
END FUNCTION

- SUB
Bentuk umum penulisan SUB :
SUB nama_sub [(parameter)]
   [blok statement]
END SUB

3. - Contoh program GO SUB:
CLS
DIM I AS INTEGER
PRINT "Dodo", "1PK40", "Bekasi"
GO SUB 15
PRINT "Didi", "1PK33", "Depok"
GO SUB 15
END
15 PRINT STRING$(35 ,"-")
RETURN

Output program :
Bodo 1PK40 Bekasi
---------------------------------
Didi 1PK33 Depok
---------------------------------

- Contoh program FUNCTION:
DIM a AS SINGLE, kal AS STRING
DEF FNkuadrat (x) = x^2
DEF FNfaktorial (n)
DIM Hasil AS DOUBLE
   Hasil=1
   For I%=1 to n
   Hasil = Hasil * I%
   NEXT I%
   FNfaktorial = Hasil
END DEF
CLS
INPUT "Masukan Angka Positif > "; a
PRINT a; "! = "; FNfaktorial(a)
PRINT a; "^2 = "; FNkuadrat (a)
PRINT
INPUT "Masukan Kalimat > "; kal
PRINT kal; " >> "; besar(kal)
END

FUNCTION besar$ (kata$)
   Besar$ = UCASE$ (kata$)
END FUNCTION

Output program :
Masukan Angka Positif > 5
5 ! = 120
5 ^2= 25
Masukan Kalimat > Anak Mesin
Anak Mesin >> ANAK MESIN

- Contoh program SUB:
DIM pil AS INTEGER
CLS
LOCATE 5, 15
PRINT "< Main Menu >"
LOCATE 6, 15
PRINT "1. Menu Pertama"
LOCATE 7, 15
PRINT "2. Menu Kedua"
LOCATE 8, 15
PRINT "3. Menu Ketiga"
LOCATE 9,15
INPUT "Pilihan Anda > "; pil
SELECT CASE pil
CASE 1
   Satu
CASE 2
   Dua
CASE 3
   Tiga
ELSE CASE
   PRINT "Pilihan Anda Ngawur !"
END SELECT
END

SUB Satu
   PRINT "ANDA MEMILIH MENU PERTAMA"
END SUB
SUB Dua
   PRINT "ANDA MEMILIH MENU KEDUA"
END SUB
SUB Tiga
   PRINT "ANDA MEMILIH MENU KETIGA"
END SUB

Output program :
          < Main Menu >
          1. Menu Pertama
          2. Menu Kedua
          3. Menu Ketiga
          Pilihan Anda > 3
ANDA MEMILIH MENU PERTAMA

Jika memasukan pilihan selain ketiga nomor tersebut akan tercetak kalimat :

Pilihan Anda Ngawur !

NB: Untuk Laporan Akhirnya (LA) dapat dilihat di Program QBASIC Aplikasi Sederhana untuk Menginput Barang/Produk Baju (Laporan Akhir Lab. TI Dasar)

0 komentar :

Post a Comment