Friday, May 13, 2011

33. การใช้งาน Function

ฟังก์ชั่น เป็นกลุ่มคำสั่งคล้ายๆ โพซิเยอร์ แต่ต่างกันตรงที่ฟังก์ชั่นมีการส่งค่ากลับ จะต้องมีตัวแปรมาเก็บที่ได้จากฟังก์ชั่น
1) การประกาศ Function

function power(B,E:Integer):integer; # ค่าส่งกลับ
var count,temp:integer
Begin
Temp:=B;
for count:=1 to E-1 do
temp := temp*B;
power := temp;#ส่งค่ากลับด้วยการกำหนดค่าให้ชื่อฟังก์ชั่น
End;

 
2) การเรียกใช้ Function
my_answer := power(2,5);
writeln(my_answer);
หรือ
writeln(power(2,10));

No comments:

Post a Comment