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

来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/07 15:40:20
VFP写程序统计3-200之间的素数个数及所有素数之和VFP写程序统计3-200之间的素数个数及所有素数之和VFP写程序统计3-200之间的素数个数及所有素数之和*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