SAS怎么做数组乘法

shiyiming

请教各位
       比如我有一个100行20列的矩阵，我要求出两两列向量的数组乘法，即两列对应的数据相乘，得到一个新的列向量。
    用matlab做就是
    x=randn(100,20);
       X=x;
       p1=p;
      for i=1:19
          for j=i+1:20
               p1=p1+1
               X(:,p1)=x(:,i).*x(:,j);    在matlab中用点乘进行数组运算，那么在sas中怎么做？
          end
      end