* 这个程序关键在于,x=int(x/4)*5和Loop
clear && 清屏
x=8 && 定义数值变量x=8
do while .T. && 无条件进入循环
x=x+1 && X=X+1,1次循环x=9,2次=10,3次=11......
if x=int(x/4)*5 && 如果【X=(X/5)取整*5】—这个程序也就10和15满足
??x && 成立,则显示X
else
loop && 不成立,则回到循环开头接着来,这个loop执行了5次(当X=9/11/12/13/14时)
endif
if x>10 && X>10则退出循环,x=10【X=(X/5)取整*5】但≯10,所以不执行exit碰到enddo回到循环开头,第2次=15>10【X=(X/5)取整*5】已>10,所以执行了exit.
exit
endif
enddo
** 没看花眼吧?