题目内容（请给出正确答案）

[主观题]

对于室温下的双原子分子理想气体，在等压膨胀的情况下，系统对外所做的功与从外界吸收的热量之比A/

Q等于()。

A．2/7

B．2/5

C．1/4

D．1/3

查看答案

如搜索结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装上学吧APP，拍照搜题省时又省心！

更多“对于室温下的双原子分子理想气体，在等压膨胀的情况下，系统对外…”相关的问题

第1题

在窗体上画一个文本框，然后编写如下程序：Option Base 1Private Sub Form_Click（)Dim Arr（10)As I

在窗体上画一个文本框，然后编写如下程序： Option Base 1 Private Sub Form_Click() Dim Arr(10)As Integer For i=6 To 10 Arr(i)=i-3 Next i Text1．Text：Str(Arr(6)+Arr(Arr(6)+Arr(10))) End Sub 程序运行后，单击窗体，在文本框中显示的内容是

A．1

B．3

C．6

D．10

点击查看答案

第2题

在窗体上画一个名称为Text1的文本框，然后编写如下代码：Option Base 1Private Sub Form. Click（)

在窗体上画一个名称为Text1的文本框，然后编写如下代码： Option Base 1 Private Sub Form. Click() Dim arr Dim Start As Integer, Finish As Integer Dim Sum As Integer arr = Array(12, 4, 8, 16) Start = LBound (arr) Finish = UBound (arr) Sun = 0 For i = Start To Finish Sum = Sum + arr(i) Next i c = Sum/Finish Text1.Text = c End Sub程序运行后，单击窗体，则在文本框中显示的内容是______。

A．40

B．10

C．12

D．16

点击查看答案

第3题

在窗体上画一个命令按钮，然后编写如下事件过程：Option Base 1Private Sub Command1_Click（)Dim a

在窗体上画一个命令按钮，然后编写如下事件过程：Option Base 1Private Sub Command1_Click() Dim a As Variant a= Array (1,2,3,4) j=1 for i=a To 1 Step-1 s=s+ a(i)*j j=j*10 Next i Print sEnd Sub 运行上面的程序，单击命令按钮，其输出结果是______ 。

A．4321

B．12

C．34

D．1234

点击查看答案

第4题

在窗体上画一个命令按钮，其名称为Command1，然后编写如下代码：Option Base 1Private Sub Command1

在窗体上画一个命令按钮，其名称为Command1，然后编写如下代码： Option Base 1 Private Sub Command1_Click () Dim a a = Array(1, 2, 3, 4) j = 1 For i = 1 To 4 s = s + a(i) * j j = j * 10 Next i Print s End Sub程序运行后，单击命令按钮，其输出结果是______。

A．1234

B．12

C．34

D．4321

点击查看答案

第5题

在窗体上画一个命令按钮（其Name属性为Command1)，然后编写如下代码：Option Base 1Private Sub Com

在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Option Base 1 Private Sub Command1_Click() Dim a s=0 a=Array(1,2,3,4) j=1 For i=4 To 1 Step-1 s=s+a(i)*J j=j*10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出结果是()。

A．4321

B．1234

C．34

D．12

点击查看答案

第6题

在窗体上画一个命令按钮（其Name属性为Command1)，然后编写如下代码：Option Base 1Private Sub Com

在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Option Base 1 Private Sub Command1_Click() Dim a s=0：j=1 a=Array(1,2,3,4) For i=4 To 1 Step-1 s=s+a(i)*j j=j*10 Next Print s End Sub 运行上面的程序并单击命令按钮，其输出结果是

A．4221

B．1234

C．34

D．12

点击查看答案

第7题

在窗体上画一个名称为Command1的命令按钮，然后编写如下代码：Option Base 1Private Sub Command1_

在窗体上画一个名称为Command1的命令按钮，然后编写如下代码： Option Base 1 Private Sub Command1_Click() d=0 c=10 x=Array(10，12，21，32，24) For i=1 To 5 If x(i)＞c Then d=d+x(i) c=x(i) Else d=d-c End If Next I Print d End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为 ______。

A．89

B．99

C．23

D．77

点击查看答案

第8题

在窗体上画一个名为Command1的命令按钮，然后编写如下程序：Option Base 1Private Sub Command1_Cl

在窗体上画一个名为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim Arr Arr = Array(1,2,3,4,5) j=1 For i = 5 To 1 Step -1 S = S + Art(i) * j j =j * 10 Next Print S End Sub 程序运行后，单击命令按钮，输出结果为()。

A．54321

B．123

C．12345

D．345

点击查看答案

第9题

在窗体上画一个名为Command1的命令按钮，然后编写如下程序：Option Base 1Private Sub Command1_Cl

在窗体上画一个名为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim Arr Arr=Array(1，2，3，4，5) j = 1 For i=5 To 1 Step-1 S=S+Arr(i)*j j=j*10 Next Print S End Sub 程序运行后，单击命令按钮，输出结果为()。

A．54321

B．123

C．12345

D．345

点击查看答案