const
  //static array with fixed bounds
  N1: array [0..2] of Integer = (1, 2, 3);

var
  N2, N3: TArray<Integer>;
  S1: TArray<string>;
  N4: TArray<TArray<Integer>>;
begin
  //empty dynamic arrays
  N2 := nil;
  N3 := [];

  //dynamic array literals
  N3 := [1, 2, 3];
  S1 := ['1', '2', '3'];

  //multidimensional (jagged) array
  N4 := [[1, 2], [3, 4, 5]];
  N4[1][2] := 7;

  WriteLn('n1[0] is ', N1[0]);
  WriteLn('n2 length is ', Length(N2));
  WriteLn('n3 length is ', Length(N3));
  WriteLn('s1[2] is ', S1[2]);
  WriteLn('n4[1][2] is ', N4[1][2]);
end.