VFP程序问题

来源：百度知道 编辑：UC知道 时间：2024/05/19 20:26:47
set talk off
x=0
y=0
do while x<30
x=x+1
if int(x/4) <> x/4
loop
endif
y=y+1
enddo
?"y"=
??str(y,1)
set talk on
return

程序错了两行，修改后完整程序如下：

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
set talk off
x=0
y=0
do while x<30
x=x+1
if int(x/4) <> x/4
loop
endif
y=y+1
enddo
?"y=",y
?str(y,1)
set talk on
return
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

执行结果为：
y= 7
7