第1题 求[2,5000]之间能被3或5整除的数的个数以及这些数之和。 SET TALK OFF CLOSE ALL STORE 0 TO nSUM,nNUM FOR I=2 TO 5000 IF MOD(I,3)=0 OR MOD(I,5)=0 nSUM=nSUM+I nNUM=nNUM+1 ENDIF ENDFOR ?"[2,5000]之间能被3或5整除的数的个数为",nNUM ?"[2,5000]之间能被3或5整除的数的和为",nSUM
第2题 求[100,1000]之间素数的个数,以及这些数之和。 SET TALK OFF CLOSE ALL STORE 0 TO nSUM,nNUM FOR I=100 TO 1000 lOK=.T. FOR J=2 TO SQRT(I) IF MOD(I,J)=0 lOK=.F. EXIT ENDIF ENDFOR IF lOK=.T. nSUM=nSUM+I nNUM=nNUM+1 ENDIF ENDFOR ?"[100,1000]之间素数的个数为",nNUM ?"[100,1000]之间素数的和为",nSUM
第3题 求裴波那契数列前20项之和。 SET TALK OFF CLOSE ALL STORE 1 TO nSUM,nNUM1,nNUM2 FOR I=2 TO 20 nSUM=nSUM+nNUM2 nTEMP=nNUM1+nNUM2 nNUM1=nNUM2 nNUM2=nTEMP ENDFOR ?"裴波那契数列前20项之和为",nSUM