MODUL 3
1. Procedure adalah modul
program yang mengerjakan aktivitas / tugas secara khusus dan menghasilkan efek
tertentu
a. Procedure
Sub : tidak mengembalikan
hasil setelah dilakukan perintah hanya dapat melakukan operasi saja
b. Procedure
Function : dapat mengembalikan hasil
setelah dilakukan perintah
c. Procedure
Event : digunakan pada suatu
event yang ada pada objek
d. Procedure
Property : untuk mengambil dan
mengubah nilai property pada objek
(http://sahrulwijaya.blogspot.com/2012/03/procedure-function-dalam-pascal.html?m=1) (http://diazscript.files.wordpress.com/2010/11/668.PDF)
2. Function adalah program
penerima nilai dan dapat memebrikan nilai balik setelah diberikan perintah
Contoh
fungsi:
Function
max(a,b:integer):integer;
{mengirimkan
a jika a>b dan b jika sebaliknya}
Begin
If a>b then
Max:=a
Else max:=b
End;
3. Perbedaan procedure dan
function adalah procedure tidak memberikan nilai balik setelah dilakukan
perintah sedangkan function memberikan nilai balik
4. ByVal : cara melewatkan nilai
dari sebuah argument ke sebuah procedure denga melewatkan alamatnya
ByRef : cara melewatkan alamat
dari argumen ke procedure dengan melewatkan nilai
Perbedan
ByVal dan ByRef :
ByVal
procedure hanya diizinkan untuk akses salinan variabel sedangkan ByRef dapat
akeses variabel sesungguhnya. Hasil ByVal yaitu niali variabel sebenarnya tidak
dapat diganti oleh prcedure yang melewatkannya, sedangkan hasil ByRef yaitu
nilai variabel sebenarnya dapat diganti procedure yang melewatkan
5. Operator perbandingan
(hubungan) digunakan untuk membandingkan hubungan dua operand (nilai atau
variabel)
= : sama dengan
<> : tidak sama dengan
< : kurang dari
> : lebih dari
<= : lebih kecil sama dengan
<= : lebih besar sama dengan
6. Operator percabangan
adalah operator yang digunakan untuk mendapatkan hasil yang sesuai dengan
ketentuan
If...
then : if untuk memilih kondisi, dan selanjutnya
juga dapat untuk perhitunan matematika, pembatasan program
If... then.. else : untuk mencari kondisi
yang benar dengan seleksi
If bercabang/
bersarang (nested if)
Select
case : membuat kode lebih mudah untuk dibaca
7. Operator pengulangan
adalah operator untuk memberikan pengulangan pada satu perintah hingga jumlah
terntentu
1. Do..
loop : eksekusi statement
dalam jumlah yang belum ditentukan tapi terus diseleksi apakah akan diteruskan
atau tidak
2. For..
next : digunakan apabila
mengetahui pengulangan yang dibutuhkan
3. While.. wend : pengulangan tak hingga
dengan mengikuti ketentuan yang benar, yang salah akan dilewati
8. Listing I Love you 100x
Do while
<kondisi>
I Love you
Loop
9. Listing program gaji karyawan
Procedur T Form 3C
Jabatan click(sender:T object);
Begin
If jabatan
text=”Direktur” then
e pokok text :=
‘7.000.000’
else
if Jabatan
text=”Manager” then
e pokok
text:=’3.000.000’
else
if Jabatan
text=”karyawan” then
e pokok
text:=’1.500.000’
else
e pokok text=’0’
end.
10. Kuadran 1 muncul saat x positif, y positif
Kuadran 2 muncul saat
x negative, y positif
Kuadran 3 muncul saat
x negative, y negative
Kuadran 4 muncul saat
x positif, y negative
Tidak akan keluar
lokasi kuadran jika tidak memenuhi syarat tersebut
0 komentar:
Posting Komentar