相关试卷
-
1、某算法的部分流程图如图所示，若n输入的值为1，则变量s的值是多少？如将循环体“s=s+n和n=n+2”交换顺序，则s值又是多少？( )
A、25、26 B、26、25 C、36、36 D、26、36 -
2、如图所示，当变量m=2进入内循环时，内循环的循环体执行次数为（ ）。
A、1 B、5 C、2 D、3 -
3、下列用流程图描述的算法中，正确的是( )
A、图1 B、图2 C、图3 D、图4 -
4、下列说法正确的是（ ）。A、流媒体下载工具将完整的影音文件变为影音片段 B、通用下载工具不支持文件的批量下载 C、FTP下载工具能自动登录FTP服务器，快速浏览文件目录，多服务器、多文件下载 D、网站下载工具可下载任意网站的全部文件
-
5、属于名茨伯格的组织分类中“专业型组织”的是（ ）A、以知识为基础的组织 B、小的创业企业 C、一般由CEO进行管理 D、通用汽车
-
6、支持信息系统技术方法研究的学科是（ ）A、管理科学 B、经济学 C、社会学 D、心理学
-
7、在发送邮件时，如果在收件人处填写了一个不存在的电子邮箱地址，发送后电子邮件系统通常将（ ）。A、给发送者发去一个无法送达的通知邮件 B、自动修正错误后再发送 C、不停地尝试发送 D、禁止发送者继续使用该电子邮件系统
-
8、计算机病毒传播的途径主要有网络、光盘、移动存储设备，其中通过网络传播的速度最快。
-
9、某地一户一表居民实施阶梯式水价方案。阶梯水价计量分三级，第一级为18立方米以下，每立方米按2.4元计价；第二级为18至31立方米，每立方米按3.35元计价；第三级为31立方米及以上，每立方米按4.30元计价。如图2-1-38所示算法用于根据用水量V（立方米）计算水价s(元)。
流程图如图所示，①中应入填写的是 ， ③中应该填入是。
-
10、下面程序的运行结果为：
s=0
for i in range(1,101):
s+=i
if i == 50:
print(s)
Break
-
11、下列描述正确的是（ ）
A、字符“2020 宁诺附中！”共占14字节 B、字符“！”是在全角模式下输入的 C、“2”的内码为“32”，“10”的内码为“3A” D、图中有6个ASCII码，4个汉字编码B -
12、某算法的部分流程图如图所示。执行这部分流程，输出a和b的值分别为（ ）
A、14 6 B、14 20 C、48 20 D、4 6 -
13、流程图符号中，
和 
一般作为（ ）。 A、输入输出框和判断框 B、开始结束框和判断框 C、处理框和判断框 D、处理框和输入输出框 -
14、某网页文件包含文字、链接、图像、声音，使用IE浏览器保存该网页时选择保存类型为“网页，仅Html”，则上述对象中能被保存到本地磁盘的是：（ ）A、仅文字 B、文字、链接 C、文字、链接、图像 D、文字、链接、声音
-
15、“福利管理”属于（ ）职能部门的企业过程。A、制造和生产 B、销售和市场 C、财务和会计 D、人力资源
-
16、以太网技术发明人Metcalfe等指出：如果网络成员线性增加，整个网络的价值将按（ ）A、线性增长 B、指数增长 C、几何增长 D、正态增长
-
17、下列有关于print命令的描述中，正确的是（ ）A、在打印机里打印相关的文本或者数字等 B、可以用来画图 C、在屏幕中输出相应的文本或者数字等 D、执行语句print（“python”，3.7）时会出错
-
18、利用计算机编写程序解决实际问题时，首先应该做的是（ ）A、编写程序 B、设计算法 C、调试程序 D、分析问题
-
19、给定一个m*m 的矩阵，它表示一个箱子的侧视图。箱子的每一个格子的状态可能为图-1所示，
表示钻石， 
表示固定的障碍物；将这个箱子顺时针旋转90°，由于重力原因，部分钻石的位置会发生改变。每个钻石会垂直掉落，直到它遇到阻挡(固定的障碍物、另一个钻石或者箱子的底部)。重力不会影响固定障碍物的位置，同时箱子旋转不会产生惯性，也就是说钻石的水平位置不会发生改变。图-2为盒子顺时针旋转90°以后的状态。
如果用数字来表示该矩阵，2表示钻石，1表示固定的障碍物，0表示空位置。随机生成一个m*m的矩阵在listl中显示，点击Command1按钮，按照上述要求旋转90°后的矩阵在list2 中显示。程序运行界面如图-3所示：
(1)、若m=3时，矩阵存储在a中的值为“2，0，1，1，2，0，2，0，0”，顺时针旋转90°后，a(6)中存储的值为。(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。Constm=6
Dima(1 Tom* m) As Integer '存储矩阵状态，2代表钻石，1代表固定障碍物，0代表空格
Private Sub Form_ Load()
'生成初始矩阵保存到a数组并输出到1ist1中，代码略
End Sub
Private Sub Command1_Click()
Dim q(1 To m) As Integer '存储有效空格位置
Dim f As Integer， t As Integer， k As Integer， p As Integer
f=1：t=1：k=m
'先模拟钻石下落过程
For i=1Tom*m
If Then
q(t) = k
t=t+1
ElseIf a(k) = 1 Then
f=1：t=1
ElseIf f<>t Then，
f=f+1
a(k) =0
q(t) = k
t=t+1
End If
If k Mod m=1 Then
f=1：t=1
k=k+2*m-1
Else
k=k-1
End If
Next i
'顺时针旋转90°后输出
p=(m-1)*m+1
For i =1 To m*m
s=s+Str(a(p))
If I Mod m=0 Then
List2. AddItem s
s=””
p=
Else
p=p-m
End If
Next i
End Sub
-
20、少里湾小学委托小龙同学帮助开发一个积分入学录取程序，2021年当地积分入学政策为：
一 、采用父母积分中较高者做为入学申请人的积分，积分相同时取父亲积分，由高到低进行录取(积分=社保积分+基础积分)。
二 、积分相同时，按以下条件依次确定录取顺序
1)申请人家庭在市区有自购产权住房且实际居住优先录取；
2)本区连续居住时间较长者优先录入；
3)在所采用的积分中，社保积分较高者优先录入；
4)以上全部相同，则按报名序号的先后顺序录取。
根据上述要求编写VB程序，功能如下：窗体装载时，按报名顺序读取1000个同学的信息，显示在列表框List1中。在文本框Text1中输入录取人数，单击“确定”按钮Command1，在列表框List2中按照录取序号显示录取名单。程序运行界面如图所示。
请回答下列问题：
(1)、在VB代码List1.AddItem info_ str中List1.AddItem、info_str依次表示(单选，填字母：A .对象名、方法名、变量名/B .对象名、事件名、变量名/C .对象名、属性名、属性值)。(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。Const n As Integer = 1000 '报名总人数
Dim xh(1 To 1000) As Integer，xm(1 To 1000) As String
Dim fqsb(1 To 1000) As Integer， fqjc(1 To 1000) As Integer
Dim mqsb(1 To 1000) As Integer， mqjc(1 To 1000) As Integer
Dim sfgf(1 To 1000) As Boolean， jzsc(1 To 1000) As Integer +
Private Sub Form_ Load ()
'依次读取n个入学申请人的信息，并显示在列表框List1中，代码略
' xh(1) 到xh(n)存储报名序号，对应的值从1到n
' xm(1)到xm(n)存储姓名
'fqsb(1)到fqsb (n)存储父亲社保积分，fqjc (1)到fqjc (n)存储父亲基础积分
'mqsb (1)到mqsb(n)存储母亲社保积分，mqjc (1)到mqjc (n)存储母亲基础积分
' sfgf (1)到sfgf (n)存储是否购房
'jzsc (1)到jzsc (n)存储居住时长
End Sub
Private Sub Command1_ _Click ()
Dim lqrs As Integer lqrs'表示录取人数
Dim info_ str As String
For i=1 To 1qrs
For j=i+ 1 To n
If
Thentmp= xh(i)： xh(i) = xh(j)： xh(j) = tmp
End If
Next j
'将录取的第i个学生信息显示在列表框List2中，代码略
Next i
End Sub
Function bj(a As Integer， b As Integer) As Bool ean
Dim jfa As Integer， jfb As Integer， sba As Integer， sbb As Integer
bj = False
'计算报名序号a的积分
If Then
jfa = fqsb(a) + fqjc(a)
sba = fqsb(a)
Else
jfa = mqsb(a) + mqjc (a)
sba = mqsb(a)
End If
'计算报名序号b的积分，并存入jfb、sbb，代码略
If jfa <> jfb Then
If jfa>jfb Then bj=True
ElseIf sfgf(a) <> sfgf (b) Then
If sfgf(a) = True Then bj = True
ElseIf jzsc(a) <> jzsc (b) Then
If sfgf(a) = True Then bj= True
ElseIf jzsc(a) <> jzsc(b) Then
If jzsc(a) > jzsc(b) Thenbj = True
Elself sba <> sbb Then
If sba> sbb Then bj = True
Else
If Then bj = True
End If
End Function
(3)、程序中加框处代码有错，请改正。