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.