Is there some elegant way to assign values to array, for ex:
dim A(3) as integer {1,2,4}

instead of
dim A(3) as integer

A(1)=1
A(2)=2
A(3)=4