Visual_FoxPro_数值图形程序.pptVIP

* 求100个1到50之间的随机整数,求它们的和。 SET TALK OFF S=0 FOR I=1 TO 100 M=INT(50*RAND( ))+1 ?？M S=S+M ENDFOR ?“S=”，S SET TALK ON RETU 数值类举例： 复习本章的所有数值类题目，包括书上题目及课后习题。 说明:rand()为求随机数函数,返回0到1之间的随机数。乘上50后扩大了50倍，取整后，范围为0到49之间的整数，所以最后要再加上1。 S=1+2+3+……+100 法一: SET TALK OFF S=0 FOR I=1 to 100 S=S+I ENDFOR ?S SET TALK ON 求100以内的偶数之和 SET TALK OFF S=0 FOR I=2 to 100 STEP 2 S=S+I ENDFOR ?S SET TALK ON 法二: SET TALK OFF I=1 S=0 DO WHILE I=100 S