data c;
        input num x;
cards;
0 370412
1 46545
2 3935
3 317
4 28
5 3
;
run;
data c1(keep=num);
        set c;
        do i=1 to x;
                num=num;
                output;
        end;
run;

proc means data=c1 var mean ;
var num;
output out=c2 mean=num_mean var=num_var;
run;