执行下列程序：　　　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