%Declaring array

/x [0 1] def

%Assigning value to an element, PostScript arrays are 0 based.

x 0 3 put

%Print array

x pstack
[3 1]

%Get an element

x 1 get