分析程序运行结果题(后面是答案)

《分析程序运行结果题(后面是答案)》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、分析程序运行结果题(后面是答案)：1.settalkoffi=1x=0dowhilei<=4x=x+ii=i+1enddo?xsettalkon102.settalkons=0p=10dowhilep<=20s=s+(p-3)p=p+3enddo?ssettalkon463.settalkoffclears=0i=1dowhilei<=10ifmod(i,3)=0s=s+iendifi=i+1enddo?str(s)settalkonreturn184.settalkoffa=.t.b=0dowhileab=b+1ifmod(b,3)<>0loopelse??b,space(1)第4

2、页共4页endififb>=12a=.f.endifenddosettalkonreturn369125.settalkoffx=0y=0dowhilex<100x=x+1ifint(x/2)=x/2loopelsey=y+xendifenddo?yreturnsettalkon25006.settalkoffclearx=3dowhile.t.x=x+1ifx=int(x/3)*3?xelseloopendififx>10exitendifenddoreturnsettalkon69127.SETTALKOFFCLEARN=5第4页共4页FORI=NTO1STEP-1FORJ=1T

3、OI??STR(J,1)ENDFOR?ENDFORRETURN1234512341231218．*A.PRGM=1N=2DOB.PRG?”M=”,M,”N=”,NRETURN*B.PRGPRIVATEMM=3N=4RETURNM=1N=49．SETTALKOFFM=1DOWHILEM<5N=1??MDOWHILEN

4、61911．在如下表单中，Text1和Text2的Value属性值分别设置为0。如果在Text1中输入20，再单击“开始”按钮，则Text2中显示的结果为；Edit1中显示的结果为。“开始”按钮的事件代码：FORI=1TO100IFMOD(I,Thisform.Text1.Value)=0Thisform.Edit1.Value=Thisform.Edit1.Value+Str(I,5)Thisform.Text2.Value=Thisform.Text2.Value+IENDIFENDFOR①300②20406080100第4页共4页