请教各位高手问题呢,谢谢!
修改下面程序得错误,使其能够计算出30以内(含30)能被5整除数之和。clear
store 0 to x,y
do while.T.
x=x+1
do case
case mod(x,5)=0
exit
case x<=30
loop
endcase
y=y+x
enddo
?y
clear store 0 to x,y do while x<=30
x=x+1 if mod(x,5)=0 y=y+x else
loop
endif enddo ?y
[此贴子已经被作者于2004-10-10 09:43:01编辑过]