计算1到1000之间所有素数（质数）的和怎么写？
VF中的问题
答案:1 悬赏:10 手机版
解决时间 2021-05-01 13:15
- 提问者网友：回忆在搜索
- 2021-04-30 19:26
最佳答案
- 五星知识达人网友：独钓一江月
- 2021-04-30 20:11
SET TALK OFF
clear
s=0
for i= 2 to 1000
j = INT(SQRT(i))
do while j >= 2
IF i%j==0 then
EXIT DO
ENDIF
j = j -1
ENDDO
IF j == 1 then
s = s + i
ENDIF
ENDFOR
?"sum:",s
clear
s=0
for i= 2 to 1000
j = INT(SQRT(i))
do while j >= 2
IF i%j==0 then
EXIT DO
ENDIF
j = j -1
ENDDO
IF j == 1 then
s = s + i
ENDIF
ENDFOR
?"sum:",s
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯