-->
banner

2.11.2015

author photo
Kita lanjut lagi dengan artikel tentang pemrograman pascal berikutnya. Masih ada hubungannya dengan artikel sebelumnya yakni tentang procedure dalam pascal, kali ini saya akan menjelaskan tentang fugnsi atau function dalam pascal. Function memiliki kegunaan yang sama dengan procedure, yaitu untuk memisahkan barisan kode program yang memiliki fungsi dan tujuan yang sama kedalam blok-blok tersendiri. Apabila kita memerlukan suatu hasil dari blok kode tersebut kita langsung dapat memanggilnya di dalam program inti sesuai dengan nama function tersebut.
Tetapi procedure dan function ini juga memiliki perbedaan yaitu.
  1. Procedure tidak mengembalikan nilai ke program utama, sedangkan function akan mengembalikan nilai ke program utama. Maka dari itu function harus mempunyai tipe data.
  2. Procedure outputnya diletakkan di dalam procedure itu sendiri, atau satu paket input dan output, kalau fungsi outputnya di letakkan di dalam program utama.
  3. Procedure dipanggil di program utama dengan menuliskan nama procedure tersebut di dalam program utama. Sedangkan function di panggil dengan memasukkan ke suatu variabel. atau bisa juga dengan langsung menuliskannya di program utama.
Langsung saja contoh program pascal yang menggunakan function berikut ini.
program fungsi2;
uses wincrt;

function luasling(jari:integer):real;
var luas:real;

begin
luas:= 3.14*jari*jari;
luasling:= luas;
end;

var r:integer;

begin
writeln('-----Contoh Function-----');
writeln;
write('masukkan nilai jari-jari : '); readln(r);

write('luas lingkaran adalah : ', luasling(r):0:2,' cm²');

end.

Screnshoot hasil program di atas.

function dalam pemrograman pascal
 
your advertise here

This post have 2 komentar

avatar
Zufar delete 13 February 2015 at 10:15

haduh pascal
ane html aja engga mudeng gan
xixixix

Reply
avatar
Unknown delete 13 February 2015 at 10:42

coba-coba gapapa lah bang...
nanti jga tau. hahahaha

Reply


EmoticonEmoticon

Next article Next Post
Previous article Previous Post

Advertisement

Themeindie.com