作业帮 > 综合 > 作业

求出3到200之间的所有非偶数非素数的数的个数.(用VFP编写)

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/05/01 09:43:21
求出3到200之间的所有非偶数非素数的数的个数.(用VFP编写)
答对了再加30分
运行结果为5774,1楼的程序有问题吧.
看错了,我以为你说求和.
set talk off
clear
s=0
for i = 3 to 200
if mod(i,2) 0 and notsu(i)
s = s + 1
endif
endfor
set talk on
return
function notsu(x)
for j=2 to sqrt(x)
if x%j=0
return(.t.)
endif
endfor
if j>sqrt(x)
return(.f.)
endif
endfunc