CONTOH SOAL PEMROGRAMAN KOMPUTER 1

Posted by : Unknown 29 Apr 2013

CONTOH SOAL UTS PEMROGRAMAN KOMPUTER SATU

APRIL 2013

CONTOH 1.

a. Apa yang dimaksud dengan component dan component palette, berikan masing-masing 1 contoh.

Component adalah kumpulan instruksi siap pakai, biasanya diwakili dan bisa diambil dalam bentuk visual, untuk ditaruh pada Form.

Beberapa component yg fungsinya berdekatan satu sama lain, biasanya dikelompokkan dalam satu Component Palette.

b. Apa yang dimaksud dengan object dan member, berikan masing-masing contohnya.

Object adalah Component yang ditaruh di Form, instantiate atau perwujudan dari kode abstrak component, untuk disesuaikan (costumized) dgn keinginan programmer. Setiap Component bias diwujudkan menjadi beberapa object.

Member adalah sifat dan kemampuan bawaan tiap object yang diperoleh dari Component. Member melekat pada object masing-masing.

Pada Delphi ada 3 macam member, yaitu Properties, Events dan Methods.

c. Apa yang dimaksud dengan properties, berikan 2 contohnya.

Properties adalah kumpulan variable yang bias diakses saat Design Time maupun Running Time. Misalnya, Text pada Edit, Caption pada Button, Scrollbar pada Memo dll.

d. Apa yang dimaksud dengan events, berikan 2 contohnya.

Events adalah respon object terhadap kejadian tertentu. Misalnya OnMouseDown pada Form, akan dieksekusi ketika Mouse ditekan di area Form.

e. Apa yang dimaksud dengan methods, berikan 2 contohnya.

Methods adalah kemampuan object untuk melakukan sesuatu. Misalnya Clear pada Series akan menyebabkan object series menghapus semua datanya.

CONTOH 2.

Gambarkan sebuah form yang diisi dengan 2 object Edit, 1 object Button, 1 object Memo dan 1 Fast Line Series pada Chart. Caption pada formulir diisi Nama dan NIM anda. Caption pada Button diisi tulisan ‘Fibo’. Tuliskan instruksi, untuk Button1click agar Memo1 diisi deret fibonacci sesuai dengan bilangan bulat yang diisi ke Edit1 dan Edit2. Juga agar grafiknya tampil pada chart1.

procedure TForm1.Button1Click(Sender: TObject);

var awal,akhir : integer;

satu,dua,tiga : integer;

begin

awal := strtoint(edit1.Text);

akhir := strtoint(edit2.Text);

satu := awal;

dua := awal+1;

tiga := satu+dua;

series1.Clear;

memo1.Lines.Append('ini deret fibonacci yaa');

memo1.Lines.Append(inttostr(satu));

memo1.Lines.Append(inttostr(dua));

while tiga<=akhir do

begin

memo1.Lines.Append(inttostr(tiga));

series1.AddY(tiga,'',clred);

satu := dua; dua := tiga; tiga := satu+dua;

end;

CONTOH 3.

Gambarkan sebuah form yang diisi dengan 3 object Edit, 1 object Button dan 1 Pie Series pada Chart. Tuliskan instruksi, sehingga jika Button di-klik, maka gambar pada Pie sesuai dengan bilangan bulat yang ditulis pada 3 object Edit tersebut.