VFP写程序 统计3-200之间的素数个数及所有素数之和

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/02 11:53:32
VFP写程序 统计3-200之间的素数个数及所有素数之和

VFP写程序 统计3-200之间的素数个数及所有素数之和
VFP写程序 统计3-200之间的素数个数及所有素数之和

VFP写程序 统计3-200之间的素数个数及所有素数之和
* VFP写程序 统计3-200之间的素数个数及所有素数之和
SuShuHe=0 &&素数和
SuShuGe=0 &&素数个
for sushu=3 to 200
SuShuFt=.t.
for aa=2 to SuShu-1
if mod(SuShu,aa)=0
SuShuFt=.f.
exit
endif
endfor
if SuShuFt
SuShu
SuShuGe=SuShuGe+1
SuShuHe=SuShuHe+SuShu
endif
endfor
'个数',SuShuGe
'合计',SuShuHe