type Func = function(X: Integer): Integer; 
var  
 F: Func;     P: Pointer;     N: Integer; 
F := Func(P);                      { Assign procedural value in P to F } Func(P) := F;   { Assign procedural value in F to P } 
@F := P;   { Assign pointer value in P to F } 
P := @F;   { Assign pointer value in F to P } 
N := F(N); { Call function via F } 
N := Func(P)(N);  { Call function via P } 请问最后一句是什么意思