<br />
<b>Notice</b>:  Undefined offset: 2 in <b>/home2/icentarb/public_html/icentar/classes/class.permissions.php</b> on line <b>735</b><br />
  TNiz = array[1..1000] of integer;

procedure Bubble_Sort(Count : integer; var niz : TNiz);
var
  i, j : integer;
begin
  for i := Count - 1 downto 1 do
    for j := 1 to i do
      if n