9 lines
261 B
ObjectPascal
9 lines
261 B
ObjectPascal
// Ïðèìåð èëëþñòðèðóåò èñïîëüçîâàíèå çíà÷êà & äëÿ ñíÿòèÿ àòðèáóòà êëþ÷åâîãî ñëîâà
|
|
var
|
|
&begin,&end: integer;
|
|
begin
|
|
&begin := 1;
|
|
&end := 2;
|
|
var t: System.Type := &begin.GetType; // â System.Type èñïîëüçîâàòü & íå íàäî
|
|
write(&begin,' ',&end,' ',t);
|
|
end. |