下列4份借款合同，双方对支付利息的期限均无约定，事后亦不能达成补充协议，依照合同法的规定，借款人支付利息正确的是()。

1. 编写如下程序： Private Sub Command1_Click() Dim score As Integer score = 86 If score > 85 Then r = 1 ElseIf score > 60 Then r = 2 Else r = 0 End If Print r End Sub 程序运行后，单击命令按钮Command1，输出结果为()。 A. 0 B. 1 C. 2 D. 86

A、A

B、B

C、C

D、D

有如下程序：

Private Sub Command1_Click()

j =10

For i= -1 To 1 Step 0.3

j =j + 1

Next i

Print j

End Sub

该程序共循环【 】次，程序执行完毕后j的值是【 】。

程序如下： Private Sub Form_Click() Const PI=14159 Dim r As Single，S As Single R=InputBox("请输入圆的半径"，"输入数据"，"50") S = PI*r*r Print "S="；Format(S，"，.") End Sub 程序运行后，单击窗体，将显示一个输入对话框，输入数据35，单击“确定”按钮后，输出结果为【 】。

有如下程序

#include＜stdio．h＞

int rune(int a，int b)

{return(a+b)；)

main()

{int x=2，y=5，z=8，r；

r=rune(rune(x，y)，z)；

printf("%dkn"，r)；

}

该程序的输出结果是______。

有如下程序 For i=1 To 3 For j=5 To 1 Step -1 Print i+ j Next j, I其循环执行的次数为：______。

A．12

B．13

C．14

D．15

已知关系R如下所示，关系R的主属性为(35)：候选码为(36)。

R：

A．XYZ

B．XYW

C．XZW

D．XYZW

（20 ）有如下程序段

int i =0, j=1;

int ＆ r=i ; // ①

r =j; // ②

int*p= ＆ i ; // ③

*p= ＆ r ; // ④

基中会产生编译错误的语句是

A ） ④

B ） ③

C ） ②

D ） ①

现有如下一段程序：

Option base 1

Private Sub Command1_Click()

Dim a

a=Array(3,5,7,9)

X=1

For i=4 to 1 step -1

s=s+a(i)*x

X=x*10

Next

Print s

End Sub

执行程序，单击Command1命令按钮，执行上述事件过程中，输出结果是

A)9753

B)3579

C)35

D)79