用VFP編寫程序 計算從1到100之間的素數和

s=0

for i=2 to 100

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)

s=s+i

endif

endfor