违法和不良信息举报 联系客服
免费注册 登录

k is an integer between 50 and 90 and is a multiple of 4. Wh

题目
填空题
k is an integer between 50 and 90 and is a multiple of 4. When k is divided by 5, the remainder is 3. When k is divided by 3, the remainder is 2. What is the value of k?____
如果没有搜索结果或未解决您的问题，请直接 联系老师 获取答案。
相似问题和答案

第1题：

下列程序用来计算1+2+…n,当和大于100时停止计算,请填空。

Private Sub Form_Click()

Dim n as integer,s as integer,I as integer,k as integer

s=0

k=0

n=inputbox(″请输入n的值)

For i=1 to 100

k=k+1

s=s+I

【 】

Next i

Print s

End Sub


正确答案：if s>100 then exit for
if s>100 then exit for 解析：依题意,用变量S来记录1到n的累加和,当累加和S大于100时停止计算,故加入退出循环条件"if s>100 then exit for"

第2题：

有如下程序： Private Sub Command1_Click() Dim k As Integer，m As Integer Dim p As Integer k=4：m=1 p=PC(k，m)：Print p； p=PC(k，m)：Print p End Sub Private Function PC(a As Integer，b As Integer) Static m As Integer，i As Integer m=0：i=2 i=i + m + 1 m=i + a + b PC=m End Function 程序运行后，输出的结果为

A．4 6

B．6 6

C．8 8

D．10 12


正确答案：C
解析：在Sub过程中，程序段先定义了3个Integer型变量k，m，P，并给k赋给初值4，m的初值为1，然后调用事件过程PC，并将它的值赋给p；在事件过程PC中定义了两个形参，参数的传送是通过引用实参，即将k，m的地址作为a，b的地址；在PC中，将m，I定义为静态变量，所以第一次调用后的值仍然保留，但是m，I分别都有赋值语句，将它们的值变为0，2，所以返回值不变。

第3题：

以下用户自定义函数 Function Func(a As Integer，b As Integer)As Integer Static m As Integer．i As Integer m=0：i=2 i=i+m+i m=i+a-i-b Func=m End Function 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim k As Integer，m As Integer，p As Integer k=4：m=1 P=Func(k,m) Print P End Sub 程序运行后，单击命令按钮，输出结果为

A．8

B．9

C．10

D．11


正确答案：A

第4题：

有如下程序： Private Sub Command1_Click() Dim k As Integer，m As Integer Dim op As Integer k=4:m=1 p=PPC(k,m):Print op； p=PPC(k.m):Print op End Sub Private Function PPC(a As Integer，b As Integer) Static m As Integer，i As Integer m=0:i=2 i=i+m+1 m=i+a+b PPC=m End Function 程序运行后，输出的结果为

A．4 6

B．6 6

C．8 8

D．10 12


正确答案：C
解析：考查考生对函数及函数参数的运用。
  [解题要点] 在Sub过程中，程序段先定义了3个Integer型变量k,m,op，并为k赋给初值4,m的初值为1，然后调用事件过程PPC，并将它的值赋给op。在事件过程PPC中定义了两个形参，参数的传送通过引用实参，即将k,m的地址作为a，b的地址；在PPC中，将m,i定义为静态变量，第一次调用后的值仍然保留，但是m,i分别都有赋值语句，将它们的值变为0,2，所以返回值不变。
  [错解分析] 函数PPC中的两个参数都是以传值方式传递，注意不要与传地址方式传递混淆。
  [考点链接] 过程的定义和调用，以及参数传递方式的选择。

第5题：

某个窗体己编写以下事件过程。打开窗体运行后，单击窗体，消息框的输出结果为【 】。

Private Sub Form_Click()

Dim k as Integer， n as Integer，m as Integer

n=10 ：m=1 : k=1

Do While k＜=n

m=m*2

k=k+1

Loop

MsgBox m

End Sub


正确答案：1024
1024 解析：本题考查考生对VBA中控制结构的掌握。考生应该重点掌握VBA的控制结构，本题中的Do While…Loop循环结构是考试重点内容。在题目所给程序中，第一次循环结束后，m=1*2=2，即21；第二次循环结束后， m=2*2=4，即22；可见每次循环都使得m变为原来大小的2倍。因为k的初始值为1，终止条件为k=10，所以循环一共可以执行10次，因此m最后的值应该为210，即1024。

第6题：

设执行以下程序段时依次输入2，4，6执行结果为 Dim a(4) As Integer,b(4) As Integer For k =0 To 2 a(k + 1) = Val(InputBox( "Enter data:" ) ) b(3 - k) =a(k + 1) Next Print b(k)

A．2

B．4

C．6

D．0


正确答案：A
解析：此程序段开始声明了两个整型数组a和b，其长度均为4。程序通过For…Next语句为其赋值，a(k+1)=Val(InputBox("Enterdata："))，b(3-k)=a(k+1)。当k=0时，输入2，a(1)二b(3)：2；当k=1时，输入4，a(2)；b(2)：4；当k=2时，输入4，a(3)二b(1)：6；当L=3时，中断循环，执行Print语句，即要求输出b(k)的值，而k的当前值为3，即要输出的值是b(3)，其值为2。

第7题：

在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click( ) Dim m As Integer，n As Integer，p As Integer m=3：n=5：p=O Call Y(m，n，p) Print Str(p)End SubSub Y(ByVal i As Integer，ByVal j As Integer，k As Integer) k=i + jEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是

A．4

B．6

C．8

D．10


正确答案：C
解析：此程序考查了函数的调用，函数过程有3个形参，功能是将第一个和第二个形参的和赋给第三个形参，其中前两个形参是按值传递，不会影响实参的数值，即在调用函数过程的过程中，不变化实参的数值；而第三个形参是按址传递，传递的是实参的地址，这样实参会随着过程中形参的变化而变化，即改变实参的数值。在主调过程中定义了三个整型变量，分别赋值3、5、0，调用过程后m、n的数值仍然是3、5，而p的值不再是0而变为8，即m、n的和，这也是被调函数的作用。

第8题：

（27）下列函数过程 Function Func（a As Integer,b As Integer）As Integer Static m As Integer,i As Integer M=0 i=2 A=i+m+1 b=i+a+b Func2=m End Function Private Sub Command1_Click() Dim p As Integer,k As Integer,m As Integer k=4 m=1 P=Func2(k,m) Print k;m End Sub程序运行后，单击命令按钮，输出结果是 A.3 6<CR>3 6 B.3 6<CR>3 11C.3 11<CR>3 6 D.3 11<CR>3 11


正确答案：B
【解析】本题意在考查调用Func2时，参数是按地址传递的，所以两次调用Func2时，实参k、m的值都改变了。程序运行过程如下：
第一次调用Func2(k,m)，k被行参a改变为3，m被行参改变为6；第二次调用函数后，a为3，m为11。

第9题：

在窗体上画一个名称为Command1命令按钮，然后编写如下事件过程： Private Function fun1(n As Integer)As Integer Dim k As Integer If n = 1 Then k = 1 Else k = 1 + fun1(n - 1)* 2 End If fun1 = k End Function Private Sub Command1_Click () Dim m As Integer, x As Integer x = 4 m = fun1 (x) Print m End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是

A．4

B．6

C．9

D．15


正确答案：D
解析：fun1是一个递归过程，fun1函数过程共调用了5次，在Command1的单击事件中调用了fun1(4)，其他3次调用的分别是fun1(3)、fun1(2)和fun1(1)，由fun1函数过程自身调用。在fun1的调用过程中，相当于k=1、k=1+1×2=3、k=1+3×2=7、k=1+2×7=15。

第10题：

阅读下列程序： Private Sub Command1_Click( ) Dim i As Integer，k As Integer k=2 For i=1 To 3 Print H(k)； Next i End Sub Function H(j As Integer) a=0 Static b a=a+1 b=b+1 H=a*b+j End Function 程序运行后，单击命令按钮输出结果是

A．234

B．345

C．567

D．356


正确答案：B
解析：被调过程是一个函数过程，它有一个形式参数j，在被调过程声明中，定义了一个参数a，初值为0，一个静态变量b。语句a=a+1和b=b+1分别使用a和b各增加1，然后返回H的值，因为b是静态变量，所以每次调用同一个参数k时，b会保留前次的数值，使输出的结果变化，否则每次输出的结果都是一样的。根据分析，第一次调用时a=1，b=1，H=3；第二次调用：a=1，b=2，H=4；第三次调用：a=1，b=3=,H=5。所以最后的输出结果是345。

更多相关问题
相关内容