data have1;
        set have;
        retain maxv;
        xlag=lag(x);
        maxv=max(x,maxv);
        if x=max(x,maxv) or xlag=max(x,maxv) then do;
                mean=mean(x,xlag);
                meanlag=lag(mean(x,xlag));
                finalmax=max(mean(x,xlag),lag(mean(x,xlag)));
        end;
run;
最终结果已经做出来了，中间步骤可以再精简一些，你自己精简吧。