试题
试题
试卷
登录
注册
当前位置:
首页
题型:单选题
题类:常考题
难易度:普通
浙江省诸暨中学2018-2019学年高二上学期信息技术10月阶段性考试试卷
某算法的流程图如图所示。执行这部分流程后,输出S的结果是( )
A、
45
B、
6
C、
10
D、
15
举一反三
小张学习了冒泡排序后,觉得还可以再改进,用K指向要排序的数的头部,用m指向要排序的数的尾部,每一轮先从前向后扫描k~m-1, 比较相邻若逆序则交换,找出本轮最大数放到本轮数据的尾部,再从后到前扫描剩下的序列m~k+1,比较相邻若逆序则交换,找出本轮最小数放到本轮数据头部。直到k=m结束程序。以下是改进后的程序请补充完整。
Dim n As Integer ‘数字的个数
Rem 以下程序段为产生n个[10,99]之间的随机整数并在list1中显示
Private Sub Command1_Click()
Randomize Time
n = 50
For i = 1 To n
List1.AddItem Str(Int(Rnd * 90) + 10)
Next
End Sub
Rem 以下程序段为从list1中取出数并进行排序,最后在list2中显示排序后的数
Private Sub Command2_Click()
Dim a(50) As Integer
Dim k As Integer, m As Integer, i As Integer, j As Integer
For i = 1 To n
a(i) = Val(List1.List(i - 1))
Next i
m = n:k=1
Do While {#blank#}1{#/blank#}
J=m-1 : m=1
For i = k To j
If a(i+1) < a(i) Then t = a(i): a(i) = a(i + 1): a(i + 1) = t: m=i
Next i
j ={#blank#}2{#/blank#}
k=1
For i = m To j Step -1
If a(i) < a(i - 1) Then t = a(i): a(i) = a(i - 1): a(i - 1) = t:{#blank#}3{#/blank#}
Next i
Loop
For i = 1 To n
List2.AddItem {#blank#}4{#/blank#}
Next i
End Sub
编写 VB 程序代码,实现如下功能:在文本框 Text1 中输入金额(整数)后,点击“转换”按钮Command1,则在文本框 Text2 中显示该金额的大写,程序运行界面如下图所示:
统计“英文句子单词平均长度”的程序,其实现功能为在文本框Text1中输入要统计的英文句子,单击“统计”按钮Command1。进行统计,求出句子中共有几个单词、句子单词的平均长度,并显示在标签框Label1中。程序运行界面如图所示。
一个摸球游戏的流程图如图所示(红球总数和绿球总数均大于0)。游戏结束时,S位所代表的是( )
观察图2所示的流程图(计算100以内自然数的和),回答以下问题。
VB中的三种基本程序结构是{#blank#}1{#/blank#}结构,{#blank#}2{#/blank#}结构和{#blank#}3{#/blank#}结构。
返回首页
相关试卷
浙江省A9协作体2023-2024学年高二下学期信息技术期中联考试卷
浙江省苍南中学2023-2024学年高一下学期信息技术期中考试试卷
浙江省环大罗山联盟2023-2024学年高二下学期期中考试信息技术试题
浙江省嘉兴市八校2023-2024学年高二下学期信息技术期中考试试卷
浙江省绍兴市会稽联盟2023-2024学年高二下学期信息技术期中考试试卷
试题篮
编辑
生成试卷
取消
登录
x
请输入网站账号/手机号码/邮箱
请输入密码
自动登录
忘记密码
登录
其它登录方式:
免费注册