验算滑动轴承最小油膜厚度h_min的目的是（

窗体Form1上有一个名称为Command1的命令按钮，以下对应窗体单击事件的事件过程是（ ）。

A.Private Sub Form1 Click（ ）

End Sub···

B.Private Sub Form1. Click（ ）

End Sub···

C.Private Sub Command1 click（ ）

End Sub···

D.Private Sub Command Click（ ）

End Sub···

下面程序的输出结果是( )。 #include"stdio.h" int sub(int m) { static a=4; a+=m; return a; } void main() { int i=2,j=1,k; k=sub(i); k=sub(j); printf("%d",k); }

A．6

B．7

C．8

D．9

设有如下程序

Option Base 1

Private Sub Command1_Click()

Dim arrl

Dim Min As Integer，i As Integer

arrl=Array(12，435，76，-24，78，54， 866， 43)

Min=____

For i=2 To 8

If arrl(i)＜Min Then

Next i

Print “最小值是：”；Min

End Sub

以上程序的功能是：用Arcay函数建立一个含有8个元素的数组，然后查找并输出该数组中各元素的最小值。请填空。

以下程序的输出结果是( )。

include＜stdio.h＞

main()

fint x=0;

sub(&x,16,2);

printf("%d\n",x);

}

sub(int*a,int n,int k)

{if(k＜=n) sub(a,n/2,2*k);

*a+=k;

}

设有如下程序段，其功能是查找并输出该数组中的最小值。请在空白处填入适当的内容，将程序补充完整。

Option Base 1

Private Sub Command1_Click()

Dim arr1

Dim Min As Integer, i As Integer

arr1 = Array(12, 435, 76, -24, 78, 54, 866, 43)

Min = arr1(1)

For i=2 To 8

If arr1(i)＜Min Then

Next i

Print "最小值是:"; Min

End Sub

若有以下变量和函数说明： #include＜iostream.h＞ charCh='*'； void sub(int x，int y,char ch，double*Z) { switch(ch) { case'+':*Z=x+y;break； case'-':*Z=x-y;break： case'*':*Z=x*y;break； case'/':*z=x/y;break： } } 以下合法的函数调用语句是( )。

A．sub(10，20，Ch，y)；

B．sub(1.2+3，2*2，'+'，&Z)；

C．sub(sub(1，2，'+'，&y)，sub(3，4'+'，&x)，'-'，&y)；

D．sub(a，b，&x,ch)；

设有如下程序：

Option Base 1

Private Sub Command1_Click（）

Dim arr1

Dim Min As Integer, i As Integer

arr1 = Array（12, 435, 76, -24, 78, 54, 866, 43）

Min = ______

For i = 2 To 8

If arr1（i） < Min Then______

Next

Print "最小值是："; Min

End Sub

以上程序的功能是：用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中各元素的最小值。请填空。

设有如下程序：

Option Base 1

Private Sub Commandl Click()

Dim arrl

Dim Min As Integer，i As Integer

arrl=Array(12,435,76,-24,78,54,866,43)

Min=【 】

For i=2 To 8

If arrl(i)＜Min Then【 】

Next

Print"最小值是:";Min

End Sub

以上程序的功能是：用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中各元素的最小值。请填空。