用VISUAL FOXPRO编程,要求显示所有100以内6的倍数,并求这些数的和?

用VISUAL FOXPRO编程,要求显示所有100以内6的倍数,并求这些数的和?

谢谢啦

第1个回答  2009-05-11
s=0
for i=1 to 100

if mod(i,6)=0 then
s=s+i
endif
endfor
? '1-100能被6整除的数的和是',s本回答被提问者采纳
第2个回答  2009-05-11
s=0
for i=1 to 100
if mod(i,6)=0 then
? s
endif
endfor
? '和=',s