用VF求200-500所有素数的和是多少

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/30 09:08:47
用VF求200-500所有素数的和是多少

用VF求200-500所有素数的和是多少
用VF求200-500所有素数的和是多少

用VF求200-500所有素数的和是多少
CLEAR
s=0
FOR i = 200 TO 500
k = .T.
FOR j = 2 TO i-1
IF MOD(i, j) = 0
k = .F.
EXIT
ENDIF
ENDFOR
IF k
s = s + i
ENDIF
ENDFOR
? "200-500所有素数的和是:", s
RETURN