水经验的路过

data test;
  input a b;
  datalines;
2 5
5 8
3 8
7 3
9 2
;
run;

data a;
  set test;
  array avar a1-a100 ;
  retain avar;
  array bvar b1-b100 ;
  retain bvar;
  count+1;
  avar(count)=a;
  bvar(count)=b;
if count>=2 then  c+ avar(count-1)*bvar(count-1);
else c= . ;
keep a b c;
run;

这个不对的。a×b 不是上一阶的