程序结构专题练习(一)
详细知识点请期待明天的二级VFP天天练程序控制语句专题
阅读程序,写出运行结果
1.SET TALK OFF
CLEAR
FOR I=1 TO 5
?
FOR J=1 TO 3
?? "*"
ENDFOR
ENDFOR
SET TALK ON
2.SET TALK OFF
M=.T.
N=0
DO WHILE M
N=N 1
IF MOD(N,4)<>0
LOOP
ELSE
??N,SPACE(1)
ENDIF
IF N>=10
EXIT
ENDIF
ENDDO
SET TALK ON
3.SET TALK OFF
CLEAR
Y="等级考试"
X=""
L=LEN(Y)
FOR I=L-1 TO 1 STEP -2
X=X SUBSTR(Y,I,2)
ENDFOR
?X
SET TALK ON