, , , . , ( ). .
, , , . . , , , , ( ).
, , , .
. , , . . , . , . 8.5.
. 8.5. -
, , . :
: ^ ;
:
- -;
- , -;
^ , .
:
p1: ^integer; 2: ^real;
p1 integer, a p2 real.
, , . , : ^integer, : ^ " " ".
- " ". , NIL. NIL , .
NIL . , pi 2 ,
p1:= NIL;
, if 2 = NIL then ShowMessage(' 2 !');
, 2.
( , @). , .
|
|
:= @n;
, , . , pi 2 integer,
p2:= p1;
pi 2 .
, . , 1,
^: = 5;
i . ^ , , -.
, .
new. new , . , real, new(p); real ( real), - , .
, .
, , , , ". , , Dispose, .
, , new(p), dispose () .
( 8.3) , .
8.3. ,