data crackman;
input a@@;
cards;
1 2 3 5 6 4 8 5 3 9 2 6 8 3 6 4 5 6 6 9 0 0 1 3
;
run;
data crackman;
row=1;
set crackman ;
set crackman (rename=(a=a1)) point=row;
b=a-a1;
drop a1;
run;

版主 谢谢你！！！

一个小问题你还用上point了？你就不怕他看不懂么

你来翻译一下

data crackman;                                                                                                                          
set crackman;                                                                                                                           
b=a-1;                                                                                                                                 
run;                                                                                                                                    
我想这个也行