设有5个表：std1．dbf～std5.dbf，以下程序的功能是要删除每个表文件的末记录。 n=1 DO WHILE n＜=5 db=【 】 USE db GOTO BOTTOM DELETE PACK n=n+1 ENDDO USE

有如下程序； Private SubForm_Click() Dim check As Boolean，n As Integer check=False n=0 Do Do While n＜10 n=n+1 If n=5 Then check=True Exit Do End if Print n； Loop Loop Until check = True End Sub 程序运行后，输出的结果是 ______ 。

A．1 2 3

B．1 2 3 4

C．1 2 3 4 5

D．1 2 3 4 5 6

【程序说明】程序功能是求30!。

【程序】

SET TALK OFF

CLEAR

N=1

I＝1

DO WHILE (1)

(2)

N=N+1

(3)

? I

SET TALK ON

(1)

A．N＜＞30

B．N＞30

C．N＜30

D．N＜＝30

A.n-i+1

B.n-i

C.n-i-1

D.I

有如下程序： SET TALK OFF M=O N=O DO WHILE N>M M-M+N N=N-10 ENDDO ?M RETURN 运行此程序显示M的值( )。

A．0

B．10

C．100

D．99

以下能够正确计算n!的程序是

A．Private Sub Command1 Click() n=5：x=1 Do x=x * I I=I + 1 Loop While I ＜ n Print x End Sub

B．Private Sub Command1_Click() n=5：X=1：I=1 Do X=X*I I=I + 1 Loop While I ＜n Print x End Sub

C．Private Sub Command1_Click() n=5：X=1：I=1 Do X=X * I I=I + 1 Loop While I＜=n Print X End Sub

D．Private Sub Command1_Click() n=5：X=1：I=1 Do x=x * I I=I + 1 Loop While I＞n Print X End Sub

下列程序段的执行结果为 m=2 n=3 Do m=m+n n=n+1 Loop While m＜10 Print m;n

A．1 5

B．14 6

C．a b

D．10 25

以下程序计算1+1／3+1／5+…+1／(2N+1)，直至1／(2N+1)小于0．00001，横线处应补充的程序是（ ）。 public class Sun{ public static void main(String args[]){ int n=1： double term，sum=1．0： do{ n=__； term=1．0／n； sum=sum+term； } while(term>=0．00001)； System．out．println(n)； System．out．println(sum)； } }

A.2n

B.2n+1

C.2*n

D.2*n+1

在Visual FoxPro中，以下关于删除记录的描述，正确的是（ ）。

A．SQL的DELETE命令在删除数据库表中的记录之前，不需要用USE命令打开表

B．SQL的DELETE命令和传统Visual FoxPro的DELETE命令在删除数据库表中的记录之前，都需要用USE命令打开表

C．SQL的DELETE命令可以物理地删除数据库表中的记录，而传统Visual FoxPro的DELETE命令只能逻辑删除数据库表中的记录

D．传统Visual FoxPro的DELETE命令在删除数据库表中的记录之前不需要用USE命令打开表

在下面的DO循环中，一共要循环______次。 M=5 N=1 DO WHILE N＜=H N=N+1 ENDDO

A．1

B．6

C．4

D．5

下列语句中，不能实现循环100次的是

A．N=0 Do N=N+1 Loop Until N＞=100

B．N=0 Do N=N+1 Loop While n＜100

C．N=0 N=N+1 Do Loop Until N＜100

D．N=0 Do While n＜100 N=N+1 Loop