度增长,而美国以 1%的速度递减,请问经过多少年中国能赶超美国? CLEAR Zg=33700 Mg=139800 __i=1____ DO WHILE .T. Zg=Zg*(1+0.09) Mg=Mg*(1-0.01) IF Zg>Mg THEN ___exit___ ENDIF i=i+1 ENDDO ? str(i,2)+[年 ],[中国:]+str(Zg,8,1),[美国:]+str(Mg,8,1) 8.运行下列程序段后,屏幕显示的运行结果是___33___ STORE 4 TO N ? S(N) FUNCTION S PARAMETERS X
Y=1 P=0 FOR I=1 TO X Y=Y*I P=P+Y ENDFOR RETURN P ENDFUNC 9. 下列
程序的功能是统计所有的“水仙花数”的个数( “水仙花数”是指一个 3 位数,其各 3 3 3 位数字立方和等于该数本身,例如:153=1 +5 +3 ) 修改程序的两处错误,要求不允许修改程序的总体框架和算法,不得增加或减少语句数目 nCount=1 nCount=0 FOR n=100 TO 999 n1=VAL(SUBS(STR(n,3),3,1)) n2=VAL(SUBS(STR(n,3),2,1)) n3=VAL(SUBS(STR(
n,3),1,1)) IF n=n1^3+n2^3+n3^3 nCount=nCount+1 ENDIF ENDFOR WAIT WINDOWS ‘“水仙花数”的个数为’+nCount STR(nCount) 10.下列程序的功能是统计一个字符串中包含多少个汉字,其基本算法是从字符串中依次取 一个字符,如果其 ASCII 码值大于 127,则判断此字符为汉字 修改程序的两处错误,要求不允许增加或减少语句数目 cString=’微软(Microsoft)公司开发的视窗(Windows)操作系统’ nCount=0 DO WHILE LEN(cString)=0 LEN(cString)#0 IF ASC(LEFT(nString,1))>127 nCount=nCount+1 cString=SUBSTR(cString,3) ELSE cString=SUBSTR(cString,1) SUBSTR(cString,2) ENDIF ENDDO WAIT WINDOWS ‘汉字个数为’+STR(nCount)