更多“计算题:已知f<sub>1</sub>=50Hz,f<sub>2”相关问题
  • 第1题:

    下列子过程语句中正确的是 A.Sub f1(By Val()As Integer) B.Sub f1(n()As Integer)As Integer C.Function f1(f1 As Integer)As Integer D.Function f1(By Val f As Integer)


    正确答案:D
    【解析】Sub过程定义的一般格式如下:
      [PrivateIPublicIFriend][Static]Sub 过程名[(参数表)]
      语句块
      [Exit Sub]
      [语句块]
      End Sub
      其中,Private|Public|Friend说明Sub过程的访问权限,如果没有Private|Public|Friend显式指定,则Sub过程按默认(公用的)访问权限定义。
      参数表含有在调用时要传递给该Sub过程的参数的类型和个数,多个变量则用逗号隔开。参数的格式为:
      [ByVal|ByRef]变量名[()][As数据类型]
      格式中[]里的内容表示可选,变量可以是简单变量或者数组。选项A)中参数没有参数名,所以是错误的;
      Sub过程没有返回值,所以选项B)是错误的。
      Function过程的定义的一般格式如下:
      [Public|Private|Friend][Static]Function过程名[(参数表)][As类型]
      [语句块]
      [过程名=表达式]
      [Exit Function]
      [语句块]
      End Function
      “As类型”是Function过程返回的值的数据类型,如果省略,则默认为Variant.Function函数中参数名不能与函数名相同,因此选项C)错误,选项D)中,省略了返回值类型,是正确的。

  • 第2题:

    在窗体上画一个命令按钮,命名为Command1。程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程F1,在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则F1返回1,否则返回0。能够正确实现上述功能的代码是 。A.Private Sub Command1_Click() x=InputBox("请输入整数") a=F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End FunctionB.Private Sub Command1_Click() x=InputBox("请输入整数") a=F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then F1= 0 Else F1= 1 End If End FunctionC.Private Sub Command1_Click() x=InputBox("请输入整数") F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then F1= 1 Else F1= 0 End If End FunctionD.Private Sub Command1_Click() x=InputBox("请输入整数") F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function


    正确答案:B
    【解析】本题综合考查了InputBox函数、块结构条件语句、Function函数过程等多个知识点。B项是正确选项,“Mod”表示取模,当b可以被2整除时,F1返回0,表示b为偶数时,F1返回0。这与题目要表达的意思一致。A、D项使用的Return关键字是错误的,它不能把相应的数值赋给F1。C项的功能与题目要实现的功能恰好相反,表示输入的数值为偶数时,F1返回1,故不正确。

  • 第3题:

    在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:

    Private Sub f(ByVal x As Integer)

    x=x+4

    End Sub

    Private Sub Command1_Click()

    i=3

    Call f(i)

    If i>4 Then i=i*2

    End Sub

    窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。


    正确答案:3
    3 解析: 本题考查VBA中参数传递的知识。在VBA的过程调用时,参数有两种传递方式:传址传递和传值传递。如果在过程声明时形参用ByVal声明,说明此参数为传值调用;若用ByRef声明,说明此参数为传址调用;没有说明传递类型,则默认为传址传递。本题中在定义子过程f的时候用ByVal声明了形参x,说明为传值调用,此时对x的任何更改不会影响调用它的实参i,所以执行完callf(i)这条语句后i的值不变仍为3,当然也不满足If语句的条件,故此最后输出结果为3。

  • 第4题:

    在窗体上画一个命令按钮,命名为CommandI。程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程 F1,在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则返回0。 能够正确实现上述功能的代码是

    A.Privme Sub Command1_Click() x=InputBox(“请输入整数”) a=F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function

    B.Private Sub Command1_Click() x=InputBox(“请输入整数”) a=F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then F1=0 Else F1=1 End If End Function

    C.Private Sub Command1_Click() x=InputBox(“请输入整数”) F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then F1=1 Else F1=0 End If End Function

    D.Private Sub Command1_Click() x=InputBox(“请输入整数”) F1 (Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function


    正确答案:B
    解析:本题综合考查了InputBox函数、块结构条件语句、Function函数过程等多个知识点。B项是正确选项,“Mod”表示取模,当b可以被2整除时,F1返回0,表示b为偶数时,F1返回0。这与题目要表达的意思一致。A、D项使用的Return关键字是错误的,它不能把相应的数值赋给 F1。C项的功能与题目要实现的功能恰好相反,表示输入的数值为偶数时,F1返回1,故不正确。

  • 第5题:

    下面子过程语句说明合法的是

    A.Sub f1(s1 As String*8)

    B.Sub f1(n()As Integer)As Integer

    C.Function f1(f1 As Integer)As Integer

    D.Function f1(By Val n As Integer)


    正确答案:D
    解析:选项A中,在定义Sub过程时,形参不能用定长字符串变量或定长字符串数组作为形式参数:选项B中,过程名不能被指定其数据类型:选项C中,函数名与形参名不能同名。只有选项D是正确的。

  • 第6题:

    有如下程序:

    Private Sub Form_Click()

    E=1:F=1

    For j=1 To 3

    E=E+F:F=F+E

    Next

    Print E;F

    End Sub

    该程序的输出结果是

    A.6 6

    B.5 8

    C.13 21

    D.34 55


    正确答案:C
    解析:阅读本题程序可以看出,E或F的值总是它前边E和F值的和,E和F的值顺序分别为1、1,2、3,5、8,13、21,可以很容易地用前两个数相加得到后一个数。第1次循环E和F的值分别为2和3,第2次循环E和F的值分别为5和8,第3次循环E和F的值分别为13和21,最后输出结果为13和21。

  • 第7题:

    在窗体中有一个名为run34的命令按钮,事件代码如下: Private Sub run34_Click( ) f1=1 f2=1 For n=3 T0 7 F=f1+f2 f1=f2 f2= f Next n MsgBox f End Sub 打开窗体,单击命令按钮,消息框的输出结果是( )。

    A.8

    B.13

    C.21

    D.其他结果


    正确答案:B
    按代码逻辑依次代入得n=3,f=1+1=2,fl=1,f2=2;n=4,f=3,fl=2,f2=3;n=5;f=5,fl=3,f2=5;n=6,f=8,fl=5,f2=8,n=7,f=13,fl=8,f2=13。

  • 第8题:

    在窗体中添加一个命令按钮,编写如下程序:

    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 4

    B.Sub: 2 6 4 Main: 2 6 4

    C.Sub: 2 6 4 Main: 1 2 3

    D.Sub: 2 6 4 Main: 2 2 3


    正确答案:D
    解析:考查考生对参数传递的掌握情况。这是在实现子过程被调用时参数虚实结合的问题。a1为变量按址传送,b1+3和c1为表达式按值传送。参数的传值方式和传址方式的区别。

  • 第9题:

    在窗体中添加一个命令按钮,编写如下程序: 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 4

    B.Sub: 2 6 4 Main: 2 6 4

    C.Sub: 2 6 4 Main: 1 2 3

    D.Sub: 2 6 4 Main: 2 2 3


    正确答案:D
    解析:这是在实现子过程被调用时参数虚实结合的问题。a1为变量按址传送,b1+3和c1为表达式按值传送。

  • 第10题:

    单选题
    变直径圆管流,细断面直径d1,粗断面直径d2=2d1,粗细断面雷诺数的关系是(    )。
    A

    <p>Re<sub>1</sub>=0.5Re<sub>2</sub></p>

    B

    <p>Re<sub>1</sub>=Re<sub>2</sub></p>

    C

    <p>Re<sub>1</sub>=1.5Re<sub>2</sub></p>

    D

    <p>Re<sub>1</sub>=2Re<sub>2</sub>         </p>


    正确答案: D
    解析: 暂无解析

  • 第11题:

    单选题
    已知某药口服肝脏首过效应很大,改用肌肉注射后( )。
    A

    <p>t<sub>1/2</sub>减少,生物利用度也减少</p>

    B

    <p>t<sub>1/2</sub>不变,生物利用度增加</p>

    C

    <p>t<sub>1/2</sub>增加,生物利用度也增加</p>

    D

    <p>t<sub>1/2</sub>不变,生物利用度减少</p>

    E

    <p>t<sub>1/2</sub>和生物利用度皆不变化</p>


    正确答案: E
    解析:

  • 第12题:

    多选题
    在过程控制中,若TL=-3,Tu=3,u=1,σ=1,则(  )。
    A

    C<sub>P</sub>=1    

    B

    C<sub>P</sub>=2/3      

    C

    C<sub>Pk</sub>=1  

    D

    C<sub>Pk</sub>=2/3


    正确答案: C,D
    解析: 暂无解析

  • 第13题:

    (33)下列子过程语句的说明正确的是A.Sub f1(By Val x()As Integer) B.Sub f1(X%())As IntegerC.Function f1l%(f1%) D.Function f1%(x As Integer)


    正确答案:D
    【解析】选项A)中,形式参数为数组,但数组不能作为值传递方式;选项B)中,Sub过程不能有返回值;选项C)中的参数和函数名相同是不允许的;选项D)中对子过程的定义是正确的。

  • 第14题:

    有如下程序:

    Private Sub Form_C1ick()

    E=1:F=1

    For j=1 To 3

    E=E+F:F=F+E

    Next

    Print E;F

    End Sub

    该程序的输出结果是

    A.6 6

    B. 5 8

    C. 13 21

    D.34 55


    正确答案:C
    解析:阅读本题程序可以看出,E或F的值总是它前边E和F值的和,E和F的值顺序分别为1、1,2、3,5、8, 13、21,可以很容易地用前两个数相加得到后一个数。第1次循环E和F的值分别为2和3,第2次循环E和F的值分别为5和8,第3次循环E和F的值分别为13和21,最后输出结果为13和21。

  • 第15题:

    下面子过程说明合法的是( )。

    A、Sub f1(ByVal n%())

    B、 Sub f1(%)As integer

    C、 Function f1%(f1%)

    D、 Function f1(ByVal n%)


    参考答案D

  • 第16题:

    有如下程序: Private Sub Form_Click() E=1:F=1 For j=1 To 3 E=E+F:F=F+E Next Print E:F End Sub 该程序的输出结果是

    A. 6 6

    B. 5 8

    C.13 21

    D.34 55


    正确答案:C
    解析:阅读本题程序可以看出,E或F的值总是它前边E和F值的和,E和F的值顺序分别为1、1,2、3,5、8,13、21,可以很容易地用前两个数相加得到后一个数。第1次循环E和F的值分别为2和3,第2次循环E和F的值分别为5和8,第3次循环E和F的值分别为13和21,最后输出结果为13和21。

  • 第17题:

    下列子过程语句中正确的是( )。

    A.Sub f1(ByVal() As Integer)

    B.Sub f1(n() As Integer)As Integer

    C.Function f1(f1 As Integer)As Integer

    D.Function f1(ByVa1 f as Integer)


    正确答案:D
    解析:Sub过程定义的一般格式如下:[Private|Public|Friend][Sratic]Sub过程名[(参数表)]语句块[ExitSub][语句块]EndSub其中,Private|Public|Friend说明Sub过程的访问权限,如果没有Privge|Public|Friend显式指定,则Sub过程按缺省(公用的)访问权限定义。参数表含有在调用耐要传递给该Sub过程的参数的类型和个数,多个变量则用逗号隔开。参数的格式为:[ByVal|ByRef]变量名[()][As数据类型]格式中[]里的内容表示可选,变量可以是简单变量或者敷组。选项A中参数没有参数名,所以是错误的;因为Sub过程没有返回值,所以选项B是错误的。Function过程的定义的一般格式如下:[Public|private|Friend][Static]Function过程名[(参数表)][As类型][语句块](过程名=表达式)[ExitFunction][语句块]EndFunction“As类型”是Function过程返回的值的数据类型,如果省略,则默认为Variant。Function函数中参数名不能与函数名相同,因此选项C错误;选项D中省略了返回值类型,是正确的。

  • 第18题:

    下面程序的输出结果是。 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


    正确答案:C

  • 第19题:

    在窗体中有一个名为run34的命令按钮,事件代码如下:

    Private Sub run34_Click( )

    f1=1

    f2=1

    For n=3 T0 7

    F=f1+f2

    f1=f2

    f2= f

    Next n

    MsgBox f

    End Sub

    打开窗体,单击命令按钮,消息框的输出结果是( )。

    A.8

    B.13

    C.21

    D.其他结果


    正确答案:B
    按代码逻辑依次代入得n=3,f=1+1=2,fl=1,f2=2;n=4,f=3,fl=2,f2=3;n=5;f=5,fl=3,f2=5;n=6,f=8,fl=5,f2=8,n=7,f=13,fl=8,f2=13。

  • 第20题:

    下列子过程语句的说明正确的是( )。

    A.Sub f1(ByVal x()As Integer)

    B.Sub f1(x%())As Integer

    C.Function f1%(f1%)

    D.Function f1%(x As Integer)


    正确答案:D
    解析:选项A中,形式参数为数组,但数组不能作为值传递方式;选项B中,Sub过程不能有返回值:选项C中的参数和函数名相同是不允许的;选项D中对于过程的定义是正确的。

  • 第21题:

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

    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


    正确答案:9
    9 解析:本题考查的重点是在子过程的调用过程中,虚实参数的传送问题,变量s按十传送。子过程f()求n!,sum的计算过程为1!+2!+3!=1+2+6=9

  • 第22题:

    单选题
    永续盘存法公式为()
    A

    K<sub>t</sub>+1=I<sub>t</sub>-(1-δ)K<sub>t</sub>

    B

    K<sub>t</sub>+1=It+(1-δ)K<sub>t</sub>

    C

    K<sub>t</sub>+1=I<sub>t</sub>+(1+δ)K<sub>t</sub>

    D

    K<sub>t</sub>+1=I<sub>t</sub>-(1+δ)K<sub>t</sub>


    正确答案: C
    解析: 若用Kt表示第t期初的固定资产存量,It表示第t期投资购建的固定资产数量,δ表示固定资产的折旧率,则有永续盘存法公式为:Kt+1=It+(1-δ)Kt。

  • 第23题:

    单选题
    A

    <p>I<sub>2</sub>=I<sub>3</sub></p>

    B

    <p>I<sub>2</sub>=4I<sub>3</sub></p>

    C

    <p>I<sub>2</sub>=2I<sub>3</sub></p>

    D

    <p>I<sub>3</sub>=4I<sub>2</sub></p>


    正确答案: D
    解析:

  • 第24题:

    单选题
    (  )被称为广义货币。
    A

    <p>M<sub>0</sub></p>

    B

    <p>M<sub>1</sub></p>

    C

    <p>M<sub>2</sub></p>

    D

    <p>M<sub>3</sub></p>


    正确答案: D
    解析: