See the sas codes below.

data test;
input a b c;
cards;
1  1 3
1  2 4
;

data test2;
  set test;
  array x(*) a b c;
  do i=1 to dim (x);
     d=x[i];
         output;
  end;
  keep d;
run;
proc print;run;

先谢谢你，另外还想问你一下，如果有100列，也可以用这个方法吗？数组的维数有没有限制啊？发现每种方法都要写出所有的列名

data test;
input a b c haha r4;
cards;
1  1 3 2 5
1  2 4 7 8
;

data test2;
  set test;
  array x(*) _all_;
  do i=1 to dim (x);
     d=x;
         output;
  end;
  keep d;
run;
proc print;run;