问答题If x is an integer, is (18+54)/x an integer?　　(1) 18＜x＜54　　(2) x is a multiple of 18

题目
问答题
If x is an integer, is (18+54)/x an integer?　　(1) 18＜x＜54　　(2) x is a multiple of 18
相似考题

1.单击命令按钮执行下列程序，其输出结果是。 Private Sub Commana1_Click() Dim a As Integer,b As Integer,c As Integer a = 3 b = 4 c = 5 Print SecProc(c,b,a) End Sub Function FirProc(x As Integer,y As Integer,z As Integer) FirProc = 2 * x + y + 3 * z End Function Function SecProc(x As Integer,y As Integer,z As Integer) SecProc = FirProc(z,x,y) + x End FunctionA. 20 B. 22 C. 28 D. 30

2.在窗体上画1个命令按钮，其名称为Command1，然后编写如下程序： Private Sub Command1 Click() Dim a(10) As Integer Dim x As Integer For i=1 To 10 a(i)=8+i Next x=2 Print a(f(x)＋x) End Sub Function f(x As Integer) x=x＋3 f=x End Function 程序运行后，单击命令按钮，输出结果为______。A．12B．15C．17D．18

3.执行以下程序段 Dim i As Integer,X As Integer x=0 For i=20 To 1 Step -2 x=x+i\5 Next Print x 后,x的值为______。A． 16B．17C．18D．19

4.单击命令按钮时，下列程序的执行结果为Private Sub Command1_Click（）Dim a As Integer, b As Integer, c As Integera=2: b=3: c=4Print P2（c, b, A．End SubPrivate Function P1（x As Integer, y As Integer, z As Integer）P1=2 * x + y + 3 * zEnd FunctionPrivate Function P2（x As Integer, y As Integer, z As Integer）P2=P1（z, x, y） + xEnd Function （ ）。A．21B．19C．17D．34

更多“问答题If x is an integer, is (18+54)/x an integer?　　(1) 18＜x＜54　　(2) x is a multiple of 18”相关问题

  • 第1题：

    执行以下程序段

    Dim i As Integer, x As Integer

    x = 0

    For i = 20 To 1 Step -2

    x = x + i \ 5

    Next

    Print x

    后，x的值为（ ）。

    A．16

    B．17

    C．18

    D．19


    正确答案：C

  • 第2题：

    单击命令按钮时，下列程序代码的执行结果为( )。 Private Function FirProc(x As Integer,y As Integer,z As Integer) FirProc=2*x+y+3*z End Funcfion Private Function SecProc(x As Integer,y As Integer,z As Integer) SecProc=FirProc(z，x，y)+x End Funcfion Private Sub Command1_Click() Dim a As Integer Dim b As Integer Dim c As Integer a=2 b=3 c=4 Printf SecProc(c,b,a) End Sub

    A．21

    B．19

    C．17

    D．34


    正确答案：A

  • 第3题：

    单击命令按钮时，下列程序的执行结果是

    Private Sub Command1_Click()

    Dima As Integer，b As Integer，c As Integer

    a=3:b=4:c=5

    Print SecProc(c,b,A)End Sub

    Function FirProc(x As Integer，y As Integer，z As Integer)

    FirProc=2*x+y+3*z+2

    End Function

    Function SecProc(x As Integer，y As Integer，z As Integer)

    SecProc=FirProc(z，x，y) +x+7

    End Function

    A．20

    B．25

    C．37

    D．32


    正确答案：C
    解析：此题程序代码中用了嵌套调用，我们对这样的问题要多加小心，千万不要把实参和相对应的形参弄混。主调过程Commandl_Click输出的是SecProc(c，b，A)的返回值，调用过程SecProc时，主调过程分别把实参c、b、a地址传给形参x、y、z，此时在过程SecProc中，SecProc=FirProc(a，c，B)+7。由此看出，程序段执行此语句时，将调用过程FirProc。把实参a，c，b的地址分别传给形参x、y、2，此时在过程FirProc中，FirProc=2*x+y+3*z+2，所以FirProc(a，c，B)=6+4+15 +2=27，SecProc(a，c，B)=27+3+7=37。

  • 第4题：

    单击按钮时，以下程序运行后的输出结果是 Private Sub proc1(x As Integer，y As Integer，z As Integer) x=3*z y=2*z z=x+y End Sub Private Sub Command1_Click() Dim x As Integer，y As Integer，Z As Integer x=1：y=2：z=3 Call proc1(x，x，z) Print x；x；z Call proc1(x，y，y) Print x；y；y End Sub

    A．6 6 12 `

    B．9 5 10 6101051010

    C．9 6 12

    D．9 10 10 910155410


    正确答案：A
    解析：从整体上看，可得主调过程将两次调用过程Proc1后，实参的值将随形参变化而变化，现在分析一下这两次调用实参和形参是怎么变化的。第一次调用被调过程proc1，主调过程把实参x，x，z的地址分别传给形参x，y,z，此时形参x，y，z值分别为1，1，3，执行语句x=3*z后，形参x值变为9，此时相对应的实参x也变为9，执行语句y=2*z后，形参y值变为6，则相对应的实参x值变为6。执行x=x+y后，形参z值应为12，当然这次调用后，程序代码输出的数值为6，6，12；第二次调用被调过程proc1，主调过程把实参x，x，z的地址分别传给形参x，y，z。我们应注意一下，此时实参x的值为6而不是1，所以此时形参x，y，z值分别为6，2和2，执行语句x=3*z后，形参x值为6，相对实参x值也相应的变为6。执行语句y=2*z后，形参y值变为4，相应的实参y值也变为4，执行z=x+y后，形参z值变为10，相应的实参y的值变为10，而形参y和x的地址相同，最后它们值都应为10，所以此次调用后，程序代码将输出的数值为6，10和10。

  • 第5题：

    单击一次窗体之后，下列程序代码的执行结果为______。 Private Sub Command1_ Click() Dim x As Integer, y As Integer, z As Integer x = 1: y = 2: z = 3 Call fun1 (x, y, z) Print x; y; z Call fun2(x, y, z) Print x; y; z End Sub Private Sub fun1(x As Integer, y As Integer, z As Integer) x = 10 * z y=z*z+ x z=x+ y+ z End Sub Private Sub fun2 (ByVal x As Integer, ByVal y As Integer, ByVal z As Integer) x=10*z y=z*z+ x z=x+ y +z End Sub

    A．1 2 3 30 39 72

    B．1 2 3 1 2 3

    C．30 39 72 1 2 3

    D．30 39 72 30 39 72


    正确答案：D

  • 第6题：

    单击命令按钮时，下列程序的执行结果是 Private Sub Command1_Click() BT 4 End Sub Private Sub BT(x As Integer) x=x*2+1 If x＜6 Then Call BT(x) End If x=x*2 Print x； End Sub

    A．15

    B．16

    C．17

    D．18


    正确答案：D
    解析：此题在函数调用过程中采用了简单递归的方式，具体流程如下：主调过程调用BT过程，把实参4传递给BT过程中的形参x，由x=x*2+1语句推出x=9，此时不满足BT过程中判断语句的判断条件，执行x=x*2；Print x；语句。由x=x*2语句得到x值为18并输出，结束此次调用过程，返回到主调过程结束程序，输出结果为18。

  • 第7题：

    有如下函数:Private Function firstfunc(x As Integer, y As Integer) As Integer Dim n As Integer Do While n ＜= 4 x=x +y n=-+1 Loop firstfunc = x End Function调用该函数的事件过程如下:Private Sub Command1_lick() Dim x As Integer Dim y As Integer Dim n As Integer Dim z As Integer x=1 y=1 For n = 1 To 3 z = firstfunc(x, y) Next n Print z End Sub该事件过程的执行结果是 ______。

    A．1

    B．3

    C．16

    D．9


    正确答案：C

  • 第8题：

    阅读下面的程序； Function Func(x As Integer，y As Integer)As Integer Dim n As Integer Do While n ＜ = 4 x=x + y n = n + 1 Loop Func=x End Function Private Sub Command1_Click() Dim x As Integet, y As Integer Dim n As Integer，z As Integer x=1 y=1 For n = 1 To 6 z=Func(x，y) Next n Print z End Sub 程序运行后，单击命令按钮，输出的结果为．

    A．16

    B．21

    C．26

    D．31


    正确答案：D
    解析：过程Func有两个参数，使用的是引用方式，参数和返回值均为整型，在命令按钮事件过程的For循环中调用Func过程，共循环6次，每次循环调用一次。两个过程中使用的变量(包括参数)基本相同，但由于是局部变量，不会发生冲突。无论在事件过程还是通用过程中，y的值始终保持不变，总等于1。在Func过程中，DoLoop循环共执行5次，通过变量n控制(从0～4)，每次都执行x=x+1，因此，每调用一次Func过程，都使得x=x+5，并将返回值赋给事件过程中的变量z。6次调用中，循环变量n的计算过程为：1、2、3、4、5、6：返回值z的结果为：6、11、16、21、26、31。

  • 第9题：

    在窗体上画一个命令按钮，名称为Command1。 Private Sub Command1 Click() Dim x As Integer，y As Integer x=10:y:0 Do x=x+2:y=y+x Print "x=", x; "y=",y If y＞20 Then Exit Do Loop Until x=18 End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是 ______。

    A．x=12y=12 x = 14 y = 16 x=16 y=18

    B．x=12 y=12 x= 16 y =28 x= 18 y=24

    C．x=12 y=12 x= 14 y=44

    D．x= 12 y=12 x= 14 y=26


    正确答案：D
    解析：给变量x和y赋值后，执行Do...Loop循环。第一个循环后，x的值为12，y的值为12，输出：x=12y=12。执行“语句，因为条件表达式“y＞20”为False，所以不执行后面的DoExit，判断循环结束条件“x＞14”为False，接着执行循环。第二次循环后，x的值为14，y的值为26，输出结果为x=14y=26，判断If语句的条件“y＞20”为Ture，执行DoExit语句，退出循环。

  • 第10题：

    在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x As Integer，y As Integer x = 41： y = 54 Call sub1(x，y) x = x + 1 Print x； y End Sub Private Sub sub1(n As Integer， ByVal m As Integer) n=n Mod 10 m=m\10 End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是

    A．41 54

    B．2 54

    C．1 3

    D．42 3


    正确答案：B
    解析：在Function((参数表列))过程中，“参数表列”指明了调用时传送给过程的参数类型和个数，每个参数的格式为：[ByVal][ByRef]变量名[()][As数据类型]其中系统默认为ByRef，它指明参数传送是以传地址进行的，实际参数变量的值会由于过程中对形参的操作而改变。而ByVal则不同，参数传送，是以传值传送的，实际参数变量的值不再由于过程中对形参的操作而改变，本题目中过程sub1的参数n是传地址引用，而参数m是传值引用，因此x的值改变，x=21\10+1=2；而y值不改变，仍为54。答案为选项B。

  • 第11题：

    窗体上有Text1、Text2两个文本框及一个命令按钮Command1，编写下列程序 Dim y As Integer Private Sub Command1_Click() Dim x As Integer X=2 Text1.Text=Fun2(Fun1(x)，y) Text2.Text=Fun1(x) End Sub Private Function Fun1(x As Integer)As Integer x=x+y:y=x+y Fun1=x+y End Function Private Function Fun2(x As Integer，y As Integer)As Integer Fun2=2*x+y End Function 当单击1次和单击2次命令按钮后，文本框Textl和Text2内的值分别是

    A．2 4 2 4

    B．2 4 4 8

    C．10 10 58 58

    D．4 4 8 8


    正确答案：C
    解析：函数Fun1和Fun2都是传值调用，其中，Text1文本框中的内容使用了嵌套调用。实参X是过程变量，实参Y是窗体变量。

  • 第12题：

    单击命令按钮时，下列程序的执行结果是 Private Sub Commandl_Click( ) BT 4 End Sub PriVate Sub BT(x As Integer) X=X * 2 + 1 If x ＜6 Then Call BT(x) End If X=x * 2 Print x； End Sub

    A．15

    B．16

    C．17

    D．18


    正确答案：D
    解析：此题在函数调用过程中采用了简单递归的方式，具体流程如下：主调过程调用BT过程，把实参4传递给BT过程中的形参x，由x=x*2+1语句推出x=9，此时不满足BT过程体中判断语句的判断条件，执行x=x*2；Printx；语句。由x=x*2语句得到x值为18并输出，结束此次调用过程，返回到主调过程结束程序，输出结果为18。

  • 第13题：

    下列程序运行后，单击命令按钮，窗体显示的结果为( )。 Private Function pl(x As Integer,y As Integer,z As Integer) pl=2*x+y+3*z End Function Private Function p2(X As Integer,y As Integer,z As Integer) p2=p1(z,y,x)+x End Function Private Sub Commandl_Click()

    A．23

    B．19

    C．21

    D．22


    正确答案：A

  • 第14题：

    执行以下程序段后，x的值为( )。 Dim x As Integer,i As Integer x=0 For i=20 To 0 Step -2 x=x+i\5 Next i

    A．16

    B．17

    C．18

    D．19


    正确答案：C

  • 第15题：

    单击命令按钮时，下列程序的执行结果为 Private Sub Command1_Click() Dim a As Integer，b As Integer，c As Integer a=2：b=3：C=4 Print P2(c，b，A)End Sub Private Function P1(x As Integer，y As Integer，z As Integer) P1=2 * X + y + 3 * z End Function Private Function P2(x As Integer，y As Integer，z As Integer) P2=P1(z，x，y) + X End Function

    A．21

    B．19

    C．17

    D．34


    正确答案：A
    解析：对于多个过程或函数依次调用和处理与简单过程调用处理一样，本题先调用函数P2，而函数P2又调用函数P1，结果返回的顺序是从P1到P2，P2计算后输出到调用的地方。

  • 第16题：

    执行以下程序段 Dim x As Integer， i As Integer x=0 For i=20 To Step -2 x=x+i\5 Next i 后，x的值为

    A．16

    B．17

    C．18

    D．19


    正确答案：C
    解析：本题考查For循环结构。For循环是最基本的循环语句，一般格式为：For循环变量=初值 To 终值 [Step步长]，步长省略时默认为1。在本题考生应该注意i\5的值，“\”是整除，而不是四舍五入。第1次循环，i=20，i\5=4，第2次循环，i=18，i\5=3而不是4，第3次循环i=16， i\5=3，依次类推，最后结果是18，选项C正确．

  • 第17题：

    单击一次窗体之后，下列程序代码的执行结果为______。 Private Sub Command1_ Click() Dim a As Integer, b As Integer, c As Integer a = 1: b = 2: c = 4 Print Value(a, b,C)End Sub Function Num(x As Integer, y As Integer, z As Integer) Num = x * x + y * y + z * z End Function Function Value(x As Integer, y As Integer, z As Integer) Value = Num(x, y, z) + 2 * x End Function

    A．21

    B．23

    C．19

    D．35


    正确答案：B

  • 第18题：

    以下程序运行后，单击命令按钮，窗体显示的结果是 ______。 Private Function p1(x As Integer，y As Integel，z As Integer) p1=2*x+y+3*z End Function Private Function p2(x As Integer，y As Integer，z As Integer) p2=p1(2，y，x)+x End Function Private SubCommandl_Click() Dim a As Integer Dim b As Integer Dim c As Integer a=2:b=3:c=4 Print p2(c，b，A)

    End Sub

    A．19

    B．21

    C．22

    D．23


    正确答案：D
    解析：当程序执行到Print p2(c，b，a)语句时，首先调用函数过程p2，将实参c、b、a，的值4、3、2按顺序传递给p2的形参x、y、z，使形参x、y、z的值分别是4、3、2。当执行到函数过程p2中的语句p2=p1(z，y，x)+x时，又去调用函数过程p1，并将实参x、y、x的值2、3、4按顺序传递给形参x、y、z，使函数过程p1的形参x、y、z的值分别是2、3、4。于是执行p1中的语句p1=2*x+y+3*x＝2*2+3+3*4＝4+3+12＝19。即函数过程p2中p1(2，y，x)的值为19，因此p2=p1(2，y，x)+x=19+4=23。该值返回给Command1_Click事件过程中的p2(c，b，a)，所以窗体显示的值是23。

  • 第19题：

    单击命令按钮时，下列程序代码的执行结果为______。 Private Function FirProc (x As Integer，y As Integer，z As Integer) FirProc=2*x+y+3*z End Function Private Function SecProc(x As Integer，y As Integer，z As Integer) SecProc=FirProc(z，x，y)+x End Function Private Sub Command1_Click() Dim a As Integer Dim b As Integer Dim C As Integer a=2 b = 3 c = 4 Print SecProc(c，b，A) End Sub

    A． 21

    B．19

    C．17

    D．34


    正确答案：A

  • 第20题：

    在窗体上画一个命令按钮，其名称为Commandl，然后编写如下程序： Pfivate Sub Commandl_Click() Dima(10) As Integer Dimx As Integer Fori=1 To 10 a(i)=8+i NeXt X=2 Print a(f(x)+x) End Sub Function f(X As Integer) X=X+3 f=X End Fu

    A．12

    B．15

    C．17

    D．18


    正确答案：D

  • 第21题：

    单击按钮时，以下列程序运行后的输出结果是 Private Sub proc1(x As Integer，y As Integer，z As Integer) x=3*z y=2*z z=X+y End Sub Private Sub Command1_Click( ) Dim x As Integer，y As Integer，z As Integer x=1：y=2：z=3 Call proc1(x，x，2) Print x；x；z Call proc1(x，y，y) Print x；y；y End Sub

    A．6 6 12 6 6 10

    B．9 5 10 5 10 10

    C．9 6 12 9 10 15

    D．9 5 10 5 4 10


    正确答案：A
    解析：从整体上看，主调过程将两次调用过程Proc1后，实参的值将随形参变化而变化，现在分析一下这两次调用实参和形参是怎么变化的。第一次调用被调过程proc1，主调过程把实参x，x，z的地址分别传给形参x，y，z，此时形参x，y，z值分别为1，1，3，执行语句x=3*z后，形参x值变为9，此时相对应的实参，也变为9，执行语句y=2*z后，形参y值变为6，则相对应的实参x值为6。执行z=x+y后，形参。值应为12，当然这次调用后，程序代码输出的数值为6，6，12。第二次调用被调过程proc1，主调过程把实参x，x，x的地址分别传给形参x，y，z。我们应注意一下，此时实参x的值为6而不是1，所以此时形参x，y，z值分别为6，2和2，执行语句x=3*z后，形参x值为6，相对实参x值也相应的变为6。执行语句y=2*z后，形参y值变为4，相应的实参y值也变为4，执行z=x+y后，形参z值就为10，相应的实参Y的值变为10，而形参y和。的地址相同，最后它们值都应为10，所以此次调用后，程序代码将输出的数值为6，10和10。

  • 第22题：

    单击按钮时，以下程序运行后的输出结果是 Private Sub Commandl_Click( ) Dim X As Integer，y As Integer，z As Integer x=1：y=2： Z=3 Call God(x，x，z) Print x；x；z Call God(x，y，y) Print X；y；y End Sub Private Sub God(x As Integer，y As Integer，z As Integer) x=3 * Z + 1 y=2 * Z z=x + y End Sub

    A．6 6 12 7 11 11

    B．8 5 10 5 11 11

    C．9 6 12 9 10 15

    D．8 10 10 5 9 10


    正确答案：A
    解析：从整体上看，可得主调过程将两次调用过程God后，实参的值将随形参变化而变化，现在分析一下这两次调用实参和形参是怎么变化的：第一次调用被调过程God，主调过程把实参x，x和z的地址分别传给形参x，y和z，此时形参x，y和z值分别为1，1和3，执行语句x=3*z+1后，形参x值变为10，此时相对应的实参x也变为10，执行语句y=2*z后，形参y值变为6，则相对应的实参x值变为6。执行z=x+y后，形参z值应为12，当然这次调用后，程序代码输出的数值为6，6，12；第二次调用被调过程God，主调过程把实参x，x和y的地址分别传给形参x，y和z。应注意，此时实参x的值为6而不是1，所以此时形参x，y和z值分别为6，2和2，执行语句x=3*z+1后，形参x值为7，相对实参x值也相应的变为7。执行语句y=2*z后，形参y值变为4，相应的实参y值也变为4，执行z=x+y后，形参z值变为11，相应的实参y的值变为11，而形参y和z的地址相同，所以最后它们值都应为11，所以此次调用后，输出的数值为7，11和11。

  • 第23题：

    单击命令按钮时，下列程序的执行结果是 Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer a=3:b :4:c =5 Print SecProc ( c, b,A)End Sub Function FirProc(x As Integer, y As Integer, z As Integer) FirProc:2 * x + y + 3 * z+2 End Function Function SecProc( x As Integer, y As Integer, z As Integer) SecProc = FirProc ( z, x, y) + x + 7 End Function

    A．20

    B．25

    C．37

    D．32


    正确答案：C
    解析：此题程序代码中用了嵌套调用，我们对这样的问题要多加小心，不能掉以轻心，千万不要把实参和相对应的形参弄混淆。主调过程Command1_Click输出的是SecProc(c，b，a)的返回值，调用过程SecProc时，主调过程分别把实参c、b、a地址传给形参x、y、z，此时在过程SecProc中，SecProc；FirProc(a，c，B)+7。由此看出，程序段执行此语句时，将调用过程FirProc。把实参a，c，b的地址分别传给形参x、y、z，此时在过程FirProc中，FirProc=2*x+y+3*z+2，所以FirProe(a，c，b)=6+4+15+2=27，SecProc(a，c，b)=27+3+7=37。

相关内容