)
ENDIF
?Y
SET TALK ON
2、下面程序的运行结果是(120 )。
SET TALK OFF
S=1
FOR I=1 TO 5 STEP 1
S=S*I
ENDFOR
?S
SET TALK ON
3、下面程序的运行结果是( 144 ).
SET TALK OFF
DIMENSION BB(100)
FOR I=1 TO 100
IF MOD(I,3)=1
BB(I)=10+I
ELSE
BB(I)=2*I
ENDIF
ENDFOR
?BB(34)+BB(50)
SET TALK ON
4、已知数据表XSCJ.DBF中有(C)、专业(C)、成绩(N)三个字段,下面程序的功能是( )
SET TALK OFF
USE XSCJ.DBF
MCJ=成绩
DO WHILE NOT EOF( )
IF MCJ<成绩
MCJ=成绩
ENDIF
SKIP
ENDDO
?MCJ
USE
SET TALK ON
从键盘输入10个数,找最大数
Input “请输入一个数” to n
max=n
For i=1 to 9
Input “请