Dynamické pole dynamických polí
4     
4 
constructor TGraf.Create;
begin g:=nil;
end;
procedure TGraf.pridajVrchol(m:string; xx,yy:integer);
begin
SetLength(g,Length(g)+1); g[high(g)]:=TVrchol.Create(m,xx,yy);
end;