用VF求10000000以内质数

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/20 19:24:27
用VF求10000000以内质数
x){>eE۳Mdҧm/x6uMR>~v6D{ڱ&|V˳Άgs:!JtmZl¼Sf>\ /غܥϧl}2e*l.';z_oƳuu=_tW3]4@lcrNjbl@e{f))d)+4+l YL]CPfB~mf^ք*ȥdX@0 0srJ2s5K4255 S54kJفBu

用VF求10000000以内质数
用VF求10000000以内质数

用VF求10000000以内质数
求1到10000000的所有质数,没搞错吧,运行起来电脑都要搞死机,不过还是把程序给你吧.
clear
"1到10000000之内的所有素数:"
for i=2 to 10000000
x=0
for j=2 to i-1
if i/j=int(i/j)
x=1
endif
endfor
if x=0
alltrim(str(i))+space(2)
endif
endfor