{$mode objfpc}

program tarrconstr9;

var
  a: array[0..2] of integer;
begin
  a := [1,2,3];
end.