陈子江简历:显示100以内能被2整除但被7除余2的所有数,用FOXPRO

来源:百度文库 编辑:查人人中国名人网 时间:2024/05/01 18:06:35
高手救救我,,谢谢,,

set talk off
i=7
do while i<=100
if mod(i,7)=2 .and. i/2=int(i/2)
?i
endif
i=i+1
enddo
set talk on

答案为:16、30、44、58、72、86、100
如果你取余的标准允许被除数比除数小,i的初值可赋为1,理论上2也是一个答案。
可千万别告诉我你不会用“新建”-“程序”或 MODI COMM建立PRG文件!
千万别用任一飞的,那是个死循环,不怕死机就试试!你目前只有15分,如何兑现诺言?!

i=2
do while(i<100)
if(mod(i,7)=2 and i/2=0)
?i
endif
enddo