ערכתי לאחרונה בתאריך 14.11.03 בשעה 19:32 בברכה, דני15
function function_name(פרמטרים שהפונקציה מקבלת וטיפוסיהם):return type
var
משתנים מקומיים.
begin
הוראות
השמה בשם הפונקציה את הערך המוחזר
end;
דוגמאפונקציה שמקבלת שני מספרים ומחזירה את סכומם בריבוע:
function sumsqr(a,b:integer):integer;
var
result:integer;
begin
result:=sqr(a+b);
sumsqr:=result;
end;
כעקרון המשתנה המקומי result לא הכרחי, ואפשר להציב את התוצאה ישר בשם הפונקציה.
תוכנית ראשית
program blabla;
var num1,num2:integer;
(*כאן תשים ת'פונקציה*)
begin
readln(num1,num2);
writeln(sumsqr(num1,num2));
end.
התוכנית שולחת את שני המספרים כפרמטרים לפונקציה למשתנים איי ובי, ומחזירה את סכומם בריבוע. זה יהיה הפלט...