{"id":1389,"date":"2013-12-12T23:07:14","date_gmt":"2013-12-12T16:07:14","guid":{"rendered":"http:\/\/www.sulhansetiawan.com\/?p=1389"},"modified":"2013-12-15T16:29:05","modified_gmt":"2013-12-15T09:29:05","slug":"about-parameter","status":"publish","type":"post","link":"https:\/\/sulhansetiawan.com\/id\/about-parameter\/","title":{"rendered":"Tentang parameter"},"content":{"rendered":"<p><\/p>\n<div style=\"width: 96px; margin-left: auto; margin-right: auto;\"><a href=\"\/id\/?p=1388\"><img decoding=\"async\" src=\"https:\/\/sulhansetiawan.com\/_wordpress_\/2013\/12\/arrowleft_green_32.png\" title=\"Faktorial dengan prosedur\"\/><\/a><a href=\"\/id\/?p=1379\"><img decoding=\"async\" src=\"https:\/\/sulhansetiawan.com\/_wordpress_\/2013\/12\/home_green_32.png\" title=\"Tutorial Delphi\"\/><\/a><a href=\"\/id\/?p=1390\"><img decoding=\"async\" src=\"https:\/\/sulhansetiawan.com\/_wordpress_\/2013\/12\/arrowright_green_32.png\" title=\"Menghitung permutasi\"\/><\/a><\/div>\n<p>Sekarang kita akan membahas tentang parameter dari sebuah prosedur secara lebih mendalam.<p><\/p>\nPerhatikan contoh program berikut:<\/p>\n<pre class='brush: delphi'>program Parameter;\r\n{$APPTYPE CONSOLE}\r\nvar\r\n  n:integer;\r\n  procedure TambahBilangan(bilangan:integer);\r\n  begin\r\n    bilangan:=bilangan+1;\r\n    Writeln('bilangan di dalam prosedur:',bilangan);\r\n  end;\r\nbegin\r\n  Write('Masukkan sebuah bilangan: ');\r\n  Readln(n);\r\n  TambahBilangan(n);\r\n  Writeln('bilangan di dalam program:',n);\r\n  Writeln('Tekan Enter');\r\n  Readln;\r\nend.<\/pre>\n<p>Prosedur melakukan perubahan terhadap parameternya. Tetapi perhatikan hasilnya jika dijalankan. Ternyata variabel yang dikirimkan sebagai parameter tetap tidak berubah.<\/p>\n<pre>Masukkan sebuah bilangan: 5\r\nbilangan di dalam prosedur:6\r\nbilangan di dalam program:5\r\nTekan Enter\r\n\r\n<\/pre>\n<p>Perhatikan contoh yang lain:<\/p>\n<pre class='brush: delphi'>program Parameter2;\r\n{$APPTYPE CONSOLE}\r\nvar\r\n  n:integer;\r\n  procedure TambahBilangan(var bilangan:integer);\r\n  begin\r\n    bilangan:=bilangan+1;\r\n    Writeln('bilangan di dalam prosedur:',bilangan);\r\n  end;\r\nbegin\r\n  Write('Masukkan sebuah bilangan: ');\r\n  Readln(n);\r\n  TambahBilangan(n);\r\n  Writeln('bilangan di dalam program:',n);\r\n  Writeln('Tekan Enter');\r\n  Readln;\r\nend.<\/pre>\n<p>Dengan penambahan kata yang dicadangkan <code><strong>var<\/strong><\/code> sebelum parameter, maka perubahan terhadap parameter didalam prosedur akan direfleksikan kepada variabel yang dikirim sebagai parameternya.<\/p>\n<pre>Masukkan sebuah bilangan: 5\r\nbilangan di dalam prosedur:6\r\nbilangan di dalam program:6\r\nTekan Enter\r\n\r\n<\/pre>\n<p>Ada dua buah kata yang dicadangkan yang lain yang bisa digunakan untuk parameter.<\/p>\n<ol>\n<li>Jika Anda tidak ingin sebuah parameter diubah didalam prosedur, tambahkan kata <code><strong>const<\/strong><\/code> di depan parameter. Tambahkan kata tersebut jika prosedur memang tidak bermaksud untuk mengubah parameter. Cara ini akan menambah kecepatan pelaksanaan program.<\/li>\n<li>Jika Anda ingin membuat parameter yang hanya berfungsi untuk keluaran, tambahkan kata <code><strong>out<\/strong><\/code> di depan parameter.<\/li>\n<\/ol>\n<h3>Jumlah parameter<\/h3>\n<p>Anda boleh membuat parameter sebanyak yang Anda butuhkan. Setiap parameter dipisahkan dengan tanda titik koma. Contoh:<\/p>\n<p><code><strong>procedure <\/strong>Proc1(param1:<strong>integer<\/strong>; param2:<strong>string<\/strong>);<p><\/p>\n<strong>procedure <\/strong>Proc2(param1:<strong>integer<\/strong>; param2:<strong>integer<\/strong>);<p><\/p>\n<strong>procedure <\/strong>Proc3(param1,param2:<strong>integer<\/strong>);<\/code><\/p>\n<p>Contoh pertama adalah prosedur dengan dua parameter yang memiliki tipe data berbeda. Sedangkan contoh kedua dan ketiga adalah prosedur yang memiliki dua parameter dengan tipe data yang sama. Pada contoh ketiga ditunjukkan bahwa untuk parameter dengan tipe data yang sama, maka parameter tersebut dapat dikumpulkan dengan dipisahkan oleh tanda koma. Walaupun demikian, jika kedua parameter tersebut memiliki tipe akses yang berbeda, maka penulisan parameter tetap harus dipisahkan. Contoh:<\/p>\n<p><code><strong>procedure <\/strong>Proc4(<strong>var <\/strong>param1:<strong>integer<\/strong>; param2:<strong>integer<\/strong>);<\/code><p><\/p>\ntidak boleh diganti menjadi:<p><\/p>\n<code><strong>procedure <\/strong>Proc4(<strong>var <\/strong>param1,param2:<strong>integer<\/strong>);<\/code><p><\/p>\nkarena cara tersebut memiliki arti:<p><\/p>\n<code><strong>procedure <\/strong>Proc4(<strong>var <\/strong>param1:<strong>integer<\/strong>;<strong>var <\/strong>param2:<strong>integer<\/strong>);<\/code><\/p>\n<div style=\"width: 96px; margin-left: auto; margin-right: auto;\"><a href=\"\/id\/?p=1388\"><img decoding=\"async\" src=\"https:\/\/sulhansetiawan.com\/_wordpress_\/2013\/12\/arrowleft_green_32.png\" title=\"Faktorial dengan prosedur\"\/><\/a><a href=\"\/id\/?p=1379\"><img decoding=\"async\" src=\"https:\/\/sulhansetiawan.com\/_wordpress_\/2013\/12\/home_green_32.png\" title=\"Tutorial Delphi\"\/><\/a><a href=\"\/id\/?p=1390\"><img decoding=\"async\" src=\"https:\/\/sulhansetiawan.com\/_wordpress_\/2013\/12\/arrowright_green_32.png\" title=\"Menghitung permutasi\"\/><\/a><\/div>\n<p><\/p>","protected":false},"excerpt":{"rendered":"<p>Sekarang kita akan membahas tentang parameter dari sebuah prosedur secara lebih mendalam. Perhatikan contoh program berikut: program Parameter; {$APPTYPE CONSOLE} var n:integer; procedure TambahBilangan(bilangan:integer); begin bilangan:=bilangan+1; Writeln(&#8216;bilangan di dalam prosedur:&#8217;,bilangan); end; begin Write(&#8216;Masukkan sebuah bilangan: &#8216;); Readln(n); TambahBilangan(n); Writeln(&#8216;bilangan di dalam program:&#8217;,n); Writeln(&#8216;Tekan Enter&#8217;); Readln; end. Prosedur melakukan perubahan terhadap parameternya. Tetapi perhatikan hasilnya jika&hellip;<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[105,104,96,145],"tags":[106],"class_list":["post-1389","post","type-post","status-publish","format-standard","hentry","category-delphi-lazarus","category-programming","category-all","category-tutorial","tag-delphi"],"_links":{"self":[{"href":"https:\/\/sulhansetiawan.com\/id\/wp-json\/wp\/v2\/posts\/1389","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/sulhansetiawan.com\/id\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/sulhansetiawan.com\/id\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/sulhansetiawan.com\/id\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/sulhansetiawan.com\/id\/wp-json\/wp\/v2\/comments?post=1389"}],"version-history":[{"count":0,"href":"https:\/\/sulhansetiawan.com\/id\/wp-json\/wp\/v2\/posts\/1389\/revisions"}],"wp:attachment":[{"href":"https:\/\/sulhansetiawan.com\/id\/wp-json\/wp\/v2\/media?parent=1389"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/sulhansetiawan.com\/id\/wp-json\/wp\/v2\/categories?post=1389"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/sulhansetiawan.com\/id\/wp-json\/wp\/v2\/tags?post=1389"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}