Forward İfadesinin Kullanımı

Forward İfadesinin Kullanımı
Program içinde tanımlanan Prosedür blokları içinde bazılarının programın daha sonraki satırlarında tanımlanacağını belirten ifadedir. FORWARD deyimi, sonra tanımlanacak prosedür bloğu devamında kodlanmalıdır.
Aşağıdaki örnek programda ASAMA2 prosedür bloğu devamında görülen FORWARD ifadesi blok bilgilerinin daha sonra tanımlanacağını belirtir. Program I>10 olduğu durumda sona erecektir
program procedure_ornekleri;uses crt; {Windows için Wincrt}var i:integer;Procedure Asama2;forward;Procedure Asama1;Begini:=i+1;Write(I,'.');Asama2;End;Procedu re Asama2;BeginWrite(I*i,'.');if i>10 then halt;readln;Asama1;End;beginclrscr;i:=1;asama1;end .
Yukarıda verilen iki örnek programda procedure ismini takiben herhangi bir değişken adı yazılmadığına dikkat ediniz.
Kullanıcı Tanımlı Function Alt Programları
Pascal'da altprogramlar başlığı altındaki yapısal modüllerden bir diğeri de fonksiyonlardır (function). Function ve Procedure arasındaki farkı anlayabilmek için procedure ve function olarak ayrı ayrı yazılmış bir uygulama üzerinde duralım.
PROCEDURE Toplam(X,Y:integer; var Z:integer);
begin
Z:=X+Y;
end;
FUNCTION Toplam (X,Y:integer):Integer;
begin
TOPLAM:=X+Y;
end;
Örnekte toplam isimli alt yordam (Procedure) X ve Y tamsayılarının toplamını referans parametresi türündeki Z değişkeni aracılığı ile getirir. Procedure durumunda geri döndürülecek değer, VAR ile tanımlanmış bir değişkene atanmaktadır. Fonksiyon olarak tanımlanan TOPLAM modülü ise toplamı kendisi getirmektedir. Fonksiyon sona erdirilmeden önce geri döndürülecek, fonksiyonun ismine atanmaktadır. Toplam isimli fonksiyon, integer tiptedir.
Procedure olarak yazılan TOPLAM alt programı ;
Toplam (A;B;T); (Procedure)
şeklinde çağırılırken function şeklinde geliştirilmiş Toplam alt programı ;
T:=Toplam(A;B); (Function)
komutuyla çağırılır.