执行下列程序：　　　CLEAR　　　SET TALK OFF　　　STORE 1 TO i,a,b　　　DO WHILE i＜=3　　　　　DO PROG1　　　　　"P("+STR(i,1)+")="+STR(a,2)+","　　　　　i=i+1　　　ENDDO　　　"b="+STR(b,2)　　　RETURN　　　PROCEDURE PROGl　　　a=a*2　　　b=b+a　　　SET TALK ON　　　RETURN　　程序的运行结果为（ ）。

A．非私有

B．私有

C．public

D．protected

新建人防工程抗力级别是如何规定的？