set x;
array a(10) x1-x10;
/*然后你用 do then 或者 do if then 给把x里面的值以各种方式付给a

http://www.ats.ucla.edu/stat/sas/seminars/SAS_arrays/#recode
这是ucla讲sas的一个链接，可以去看看，还可以看官网的解释，还有little sas 对于base部分的解释。

Set x;
array a(10) x1-x10;
/*用do then 或者 do if then 给a以各种你想要的条件赋值

看看官网，还有little sas对于这部分的解释

我再给你一个ucla解释的链接吧
http://www.ats.ucla.edu/stat/sas/seminars/SAS_arrays/#recode

楼主想干点啥？

我估计这是你的中间目的。

建议可以用一个proc transpose，将x的10个值放平，
在你后面的data步中就可以将这十个变量直接放到数组中。

或者你PDV遍历一下这个data步，用 _N_ 去校准赋值给数组的每个元素，你在第10条的时候才能得到满的数组。