Dynamické pole dynamických polí
4     
4 
constructor THrana.Create(c:integer; v:TVaha);
begin
     cislo:=c; vaha:=v;
end;
constructor TVrchol.Create(m:string; xx,yy:integer);
begin
      meno:=m; x:=xx; y:=yy; sus:=nil;
end;