Function Goat(X:Integer):Integer;Forward;
Function Zaxs(Y:Integer):Integer;
Begin
  Zaxs:=Goat(X)+6;
End;
Function Goat;
Begin
  Goat:=Zaxs(X)+4;
End;
----------------------------------------------------------------
Function Goat(X:Integer):Integer;
Begin
  Goat:=Zaxs(X)+6;
End;

Function Zaxs(X:Integer):Integer;
Begin
  Zaxs:=Goat(X)+4;
End;