程序；data a;
input x1-x4;
array x x1-x4;   
do _i_ =1 to 4;
max=max(x);
end;
output;
cards;
1 2 3 2
2 3 1.2 4
4 4 6 12
;
proc print;
run;