A: 48 42
B: 37 14
C: 498 5
D: 98 4
举一反三
- 请阅读程序: Private Sub Form_Click() m=1 For i=4 To 1 Step-1 Print str(m); m=m+1 For j=1 To i Print "*"; Next j Print Next i End Sub 程序运行后,单击窗体,则输出结果是______。 A: 1**** 2*** 3** 4* B: 4**** 3*** 2* 1* C: **** *** **** * D: * ** *** ****
- 标准斜齿圆柱齿轮外啮合的正确啮合条件是()。 A: m1=m2=mn,α1=α2=αn,β1=-β2 B: m1=m2=m ,α1=α2=α,h1=h2 C: m1=m2=mn,α1=α2=αn,β1=β2 D: m1=m2=m ,α1=α2=α,β1=β2
- 标准斜齿圆柱齿轮的正确啮合条件是()。 A: m1=m2=m, B: α1=α2=α C: m1=m2=m,α1=α2=α D: mn1=mn2=m,αn1=αn2=αβ1=-β2
- 3.输入一个正整数m(>2),判断m是否为素数,并输出结果。请将程序补充完整。 Private Sub Form_Click() Dim m%, i%, k% m = InputBox("请输入m的值(>2)") k = 1 For i = 【1】To【2】 If 【3】 Then k = 0 Next i If 【4】 Then Print m & "是素数" Else Print m & "不是素数" End If End Sub
- 一对直齿圆锥齿轮的正确啮合条件是()。 A: m1=m2 B: α1=α2 C: m1=m2α1=α2 D: m1=m2=mα1=α2=α
内容
- 0
图为两台三相异步电动机M1和M2的控制电路。KM1控制电动机M1启停,KM2控制电动机M2启停,M1和M2启动停止的顺序是( )。[img=323x148]17d60856153ba16.png[/img] A: M<sub >2</sub>停止后,M<sub >1</sub>才能停止 B: M<sub >2</sub>启动后,M<sub >1</sub>才能启动 C: M<sub >1</sub>启动后,M<sub >2</sub>才能启动 D: M<sub >1</sub>停止后,M<sub >2</sub>才能停止
- 1
渐开线直齿圆柱齿轮正确啮合条件是()。 A: m1=m2=m B: α1=α2=α C: z1=z2=z D: m1=m2=mα1=α2=α
- 2
下列程序代码的运行结果为( )。 Private Sub Command1_Click() For m = 1 To 10 Step 2 a = 10 For n = 1 To 20 Step 2 a = a + 2 Next n Next m Print a End Sub
- 3
下列程序执行后,其输出结果为( )。 Dim a(5) For i=0 To 4 a(i)=i+1 m=i+1 If m=3 Then a(m-1)=a(i-2)Else a(m)=a(i) If i=2 Then a(i-1)=a(m-3) a(4)=i Print a(i); Next i A: 1 1 1 4 4 B: 1 2 3 4 1 C: 1 2 1 4 4 D: 1 1 1 4 1
- 4
以下程序的运行结果是 Sub s1(b() As Integer) For i = 1 To 4 b(i) = 2 * i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4) As Integer For i = 1 To 4 a(i) = i + 5 Next i s1 a() For i = 1 To 4 Print a(i) Next i End Sub