cResult=SPACE(0)IFnNumber=0DOWHILEnNumber>0n=MOD(nNumber,2)&;&;余数nNumber=INT(nNumber/2)cResult=STR(n,1)+cResultENDDOELSEcResult='0'ENDIFWAITWINDOWS'二进制数表示为'+STR(cResult)
8、程序改错(5分)下列程序的功能用于计算1~100之间的质数的个数(注:质数是指只能被1和自身整除的自然数)。要求:①项目中有一个程序文件Pcode,将下列程序输入到其中并进行修改;②在修改程序时,不允许修改程序的总体框架和算法,不允许增加或减少语句数目。nCount=0FORm=1TO100bzs=.T.FORn=2TO9IFMOD(m,n)=0ANDm#nbzs=.F.&;&;不是质数LOOPENDIFENDFORIFNOTbzsnCount=nCount+1ENDIFENDFORWAITWINDOWS'1~100之间的质数的个数为'+STR(nCount)