在732K时反应NHCl（s）NH3（g）+HCl（g）的△G为-20.8kJ·mol-1，△H为154kJ·mol-1，则反应的△S为（）J·mol-1·K-1A、587B、-587C、239D、-239

A.S=1，K=1

B.S=3，K=2

C.S=3，K=1

D.S=3，K=3

以下程序用于求S=1+3+32+33+…+310的值。

Private Sub Commandl_Click()

S=1

T=1

ForI=1 To 10

T=______

S=S+T

NextI

Print"S="；S

End Sub

写出程序运行的结果

Public class Base

Public virtual string Hello() {return “Base”;}

Public class Sub:Base

Public override string Hello() {return “Sub”;}

1. Base b = new Base(); b.Hello;

2. Sub s = new Sub(); s.Hello;

3. Base b = new Sub (); b.Hello;

4. Sub s = new Base(); s.Hello;

编写如下事件过程： Option Base 1 Private Sub Form Click() Dim x1()As Integer Dim i As Integer Dim s As Integer ReDim x1(3) For i = 1 To UBound(x1) x1(i)=i + 1 Next i Call sub1(x1) For i = 1 To UBound(x1) s = s + x1(i) Next i Print s End Sub Private Sub sub1(n()As Integer) Dim i As Integer ReDim Preserve n(5) For i = 3 To 5 n(i)=n(i-1)*2 Next i End Sub 程序运行后，单击窗体，则窗体上显示的内容是

A．6

B．12

C．24

D．47

若有如下程序： int s[3] [3]={'a'，'b'，'C'，'d'，'e'，'f'，'g'，'h'，'i'}，*t； main() {t：(int*)malloc(sizeof(int))； sub(t，s)； printf("%c\n"，*t)； } sub(int*p，int b[][3]) {*p=b[2][1]； } 则程序运行后的输出结果是( )。

A．d

B．e

C．h

D．b

A、sub3G

B、sub6G

C、3G-4GHz

D、3G-6GHz

编写如下事件过程： Private sub sub1 (ByVal x1 As String, y1 As String) Dim xt As String Dim i As Integer i = Len(x1) Do While i＞= 1 xt = xt + Mid(x1, i, 1) i=i-1 Loop y1 = xt End Sub Private Sub Form. Click() Dim s1 As String, s2 As String s1= "teacher" sub1 s1, s2 Print s2 End Sub 程序运行后，单击窗体，则窗体上显示的内容是

A．rehcaet

B．tahreee

C．themee

D．eerthea

下面程序的输出结果是。 Private Sub Commandl_Click ch$=“ABCDEF” proc ch：Print ch End Sub Private Sub proc(ch As Stnng) s=“” For k=Len(ch) TO 1 Step -1 s=s&Mid(ch，k，1) Next k ch=s End Sub A．ABCDEF B．FEDCBA C．A D．F

A. :r/^#//g

B. :1,$ s/^#//g

C. :sed s/^#//g

D. :sub s/^#//g

下列程序运行后的输出结果是______。

Private Sub f(k，s)

s=1

For j=1 To k

s=s*j

Next

End Sub

Private Sub Command1_Click()

Sum=0

For i=1 To 3

Call f(i，s)

Sum=Sum+s

Next

Print Sum

End Sub