网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
极化指数PI为R10min/R1min，当绝缘受潮或污染时，接近于（）
- A、1
- B、1.3
- C、1.5
- D、＜1
参考答案
更多 “极化指数PI为R10min/R1min，当绝缘受潮或污染时，接近于（）A、1B、1.3C、1.5D、＜1” 相关考题
考题
有一过程如下:Sub Sub1(m As Integer,total As Long)Dim i As Integertotal=1For i=1 To mtotal=total*iNextEnd Sub调用它的事件过程如下:Private Sub Command1_Click()Dim tot As Long,a As Integera=Val(InputBox("请输入数据"))Call Sub1(a,tot)Print totEnd Sub则输入数据5,运行结果为【 】。
考题
下列程序的执行结果为Private Sub Command1_Click（）Dim s1 As String, s2 As Strings1= "abcd"Call Transfer（s1, s2）Print s2End SubPrivate Sub Transfer （ByVal xstr As String, ystr As String）Dim tempstr As Stringi=Len（xstr）Do While i =1tempstr=tempstr + Mid（xstr, i, 1）i=i - 1Loopystr=te mpstrEnd Sub（ ）。A．dcbaB．abdcC．abcdD．dabc
考题
阅读程序： Sub p( b () As Integer)For i =1To 4 b(i) = 2(iNext i End Sub Private Sub Command1_Click()Dim a (1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 call p (a) For i=1 To 4 Print a(i) Next iEnd Sub运行上面的程序，单击命令按钮，输出结果为。
考题
在窗体中添加一个名称为Com1的命令按钮，然后编写如下程序：Private Sub s(ByVal p As Integer)p=p*2End SubPrivate Sub Com1_Click()Dim i As Integeri=3Call s(i)If i＞4 Then i=i^2End sub窗体打开运行后，单击命令按钮，则消息框的输出结果为( )。
考题
单击一次命令按钮后，下列程序的执行结果是 Private Sub Command1_Click() s=P(1) +P(2) +P(3) +P(4) Print s End Sub Public Function P(N As Integer) Static Sum For i=1 To N Sum=Sum+i Next i P=Sum End FunctionA．15B．25C．35D．45
考题
在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：Private Sub s(ByVal p As Integer)p=p*2End SubPrivate Sub Command1_click()Dim i As Integeri=3Call s(i)If i＞4 Then i=i^2MsgBox iEnd Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为【 】。
考题
【程序说明】 计算下列算式的值。a，Ai为正整数，从键盘输入。其小∑Ai＝1+2…+ Ai，Ai!＝1 *2*3*Ai(i＝1，2… a)。【程序】SET TAIK OFFCLEARINPUT“M＝”TO MSTORE 0 TO S1，S2FOR I=1 TO M(8)DO SUB1DO SUB2ENDFOR? ” 所求算式的值为：“+ALLTRIM(STR(S1/S2，15，3))SET TALK ONPROCEDURE SUB1(9)FOR R＝1 TO AK＝K+RENDFOR(10)RETURNPROCEDURE SUB2(11)FOR P＝1 TO AT=T*PENDFOR(12)RETURN(8)A．INPUT“A＝”TO AB．INPUT“I=”TO IC．INPUT“R=”TO STR(R)D．INPUT“K＝”TOK
考题
单击一次命令按钮之后，下列程序代码的执行结果为 private Sub Command1_Click() S=P(1) +P(1)+P(2)+P(3)+P(4) Print S： End Sub Public Function P(N As Integer) Static Sum For I=1 To n Sum=Sum+I Next 1 P=Sum End FunctionA．20B．35C．115D．135
考题
编写如下事件过程： 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．rehcaetB．tahreeeC．themeeD．eerthea
考题
写出程序运行的结果Public class BasePublic virtual string Hello() {return “Base”;}Public class Sub:BasePublic 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．6B．12C．24D．47
考题
下列程序的执行结果为 Private Sub Command1_C1ick( ) Dim sl As String，s2 AS String s1="abcdef" Call lnvert(s1，s2) Print s2 End Sub Private Sub lnvert(ByVal xstr As String，ystr As String) Dim tempstr As Stdng i=Len(xstr) Do While i＞=1 tempstr=tempstr+Mid(xstr，i，1) i=i-1 Loop ystr=tempstr End SubA．fedcbaB．abcdefC．afbecdD．defabc
考题
下列程序的执行结果为 Private Sub Command1_Click() Dim s1 As String，s2 As String S1；="abcdef" Call Invert(s1，s2) Print s2 End Sub Private Sub Invert (ByVal xstr As String，ystr As String) Dim tempstr As String i=Len(xstr) Do While i=1 tempstr=tempstr+Mid(xstr，i，1) i=i-1 Loop ystr=tempstr End SubA．fedcbaB．abcdefC．afbecdD．defabc
考题
在窗体中添加一个命令按钮，编写如下程序： Private Sub Sub1(p，m，n) p=p+1：m=m+1：n=n+1 Print "sub1："；p；m；n End Sub Private Sub Command1_Click() a1=1：b=2：c1=3 Call Sub1(a，b1+3，c1) Print"Main："；a1；b1；c1 End Sub 程序运行后，输出结果为A．Sub： 2 6 4 Main： 2 6 4B．Sub： 2 6 4 Main： 2 6 4C．Sub： 2 6 4 Main： 1 2 3D．Sub： 2 6 4 Main： 2 2 3
考题
下列程序运行后的输出结果是______。Private Sub f(k，s)s=1For j=1 To ks=s*jNextEnd SubPrivate Sub Command1_Click()Sum=0For i=1 To 3Call f(i，s)Sum=Sum+sNextPrint SumEnd Sub
考题
9.程序执行结果s的值是 [9] 。Private Sub Commandl_Click()i = 0Doi = i + ls = i + sLoop Until i = 4Print sEnd Sub
考题
class Super { public int i = 0； public Super（String text） { i = 1； } } public class Sub extends Super { public Sub（String text） { i = 2； } public static void main（String args[]） { Sub sub = new Sub（“Hello”）； System.out.println（sub.i）； } } What is the result？（） A、 0B、 1C、 2D、 Compilation fails.
考题
单选题class Super { public int i = 0； public Super（String text） { i = 1； } } public class Sub extends Super { public Sub（String text） { i = 2； } public static void main（String args[]） { Sub sub = new Sub（“Hello”）； System.out.println（sub.i）； } } What is the result？（）A
0B
1C
2D
Compilation fails.
考题
单选题煤矿井下的有害气体主要是由（）、CO2、H2S、NO2、H2、NH3气体组成。A
COB
pCHsub4/sub、SOsub2/sub/pC
pSOsub2/sub、CO/pD
pCO、CHsub4/sub、SOsub2/sub/p
考题
单选题酶促反应速度(v)达到最大反应速度(Vmax)的80%时，底物浓度［S］为A
p1Ksubm/sub/pB
p2Ksubm/sub/pC
p3Ksubm/sub/pD
p4Ksubm/sub/pE
p5Ksubm/sub/p
考题
单选题A
pIsub2/sub=Isub3/sub/pB
pIsub2/sub=4Isub3/sub/pC
pIsub2/sub=2Isub3/sub/pD
pIsub3/sub=4Isub2/sub/p
考题
单选题class super （ public int I = 0； public super （string text） （ I = 1 ） ） public class sub extends super （ public sub （string text） （ i= 2 ） public static void main （straing args） （ sub sub = new sub （“Hello”）； system.out. PrintIn（sub.i）； ） ） What is the result？（）A
Compilation will fail.B
Compilation will succeed and the program will print “0”C
Compilation will succeed and the program will print “1”D
Compilation will succeed and the program will print “2”
考题
多选题设up为标准正态分布的p分位数，则有( )。Ausub0．49/sub＞0 Busub0．3/sub＜usub0．4 /subCusub0．5/sub＝0 Dusub0．23/sub＝-usub0．77 /subEusub0．5/sub＝-usub0．5/sub
考题
单选题已知某线声源长度为l0，在线声源垂直平分线上距线声源r0和r的分别为Lp(r0)和Lp(r)，根据《环境影响评价技术导则声环境》，按公式Lp(r)=Lp(r0)-15lg(r/r0)近似计算该线声源的噪声影响时，应满足的条件是()。A
prIsub0/sub且rsub0/subIsub0/sub /pB
prIsub0/sub/3且rsub0/subIsub0/sub/3 /pC
pIsub0/sub/3rspanI/spansub0/sub且Isub0/sub/3rsub0/subr0Isub0/sub /r0/pD
p无条件限制 /p
热门标签
最新试卷