选修1《算法与程序设计》模块上机题.docx
《选修1《算法与程序设计》模块上机题.docx》由会员分享，可在线阅读，更多相关《选修1《算法与程序设计》模块上机题.docx（21页珍藏版）》请在冰点文库上搜索。
选修1《算法与程序设计》模块上机题
2008年6月选修1《算法与程序设计》模块上机题
===================第1套,选择题=================
第1题
执行下面的VB程序段后，A的值是（）。
DimAAsInteger
DimBAsInteger
A=2
B=9
IfAPrint"A=";A
A:
2
B:
11
C:
9
D:
7
答案:
C
第2题
下面关于算法的认识错误的是（）。
A:
算法是解决问题的方法和步骤
B:
算法有一个或多个的输出
C:
算法就是计算机程序
D:
算法的步骤必须是有限的
答案:
C
第3题
在VB语言中，"Print2-2"输出结果是（）。
A:
0
B:
1
C:
True
D:
False
答案:
A
第4题
不能使用"IF"作为变量名的原因是（）。
A:
由英文字母开头
B:
后面没有使用数字
C:
使用了英文单词
D:
使用了关键字
答案:
D
第5题
数学表达式“
”，对应的VB表达式是（）。
A:
B:
C:
D:
答案:
D
第6题
函数ABS（-1.9）返回的值是（）。
A:
2
B:
1.9
C:
-1.9
D:
-2
答案:
B
第7题
在VB语言中，下面不是合法的运算符的是（）。
A:
+
B:
*
C:
\
D:
÷
答案:
D
第8题
在VB语言中，表示"5A:
5B:
x<5orx>8
C:
x>5andx<8
D:
x>5andx>8
答案:
C
第9题
如图所示的流程图为求x的绝对值算法。
根据算法，流程图中①处的内容是（）。
A:
输入-x
B:
输入x
C:
输入y
D:
输入-y
答案:
B
第10题
在VB语言中，下列正确的赋值语句是（）。
A:
x-1=2
B:
x+1=y
C:
x=y+1
D:
2*x=3
答案:
C
=======================第1套,操作题====================
第1题
编写程序：
打开"考生目录VB\230"文件夹中的文件：
"k1-2.vbp"进行以下操作后并保存！
在窗体"Form1.frm"的"Command1_Click"事件中编写代码（请不要随便更改其它代码），使之能够实现如下功能：
在Text1输入整数a、Text2输入整数b，判断一元二次方程
有无实数根。
并在Text3文本框中显示判断结果，即有实数根则在Text3文本框中输出"有"，否则输出"无"。
测试数据
在Text1文本框中输入1，在Text2文本框中输入9，Text3文本框输出有；
在Text1文本框中输入2，在Text2文本框中输入6，Text3文本框输出无；
第2题
程序填充：
打开"考生目录VB\231"文件夹中的文件：
"k1-3.vbp"进行以下操作后并保存！
在VB代码窗口指定位置修改完善程序代码实现，求1到100之间能被7整除的个数。
第3题
界面设计：
新建一个VB工程，工程文件名称为：
“工程1.vbp”，并添加一个窗体文件：
“Form1.frm”，保存在“考生文件夹VB\229\”文件夹下。
按下表的要求添加控件，并设置其属性，操作后保存！
对象
对象名
属性名
属性值
Label
Label1
Caption
语文
Label
Label2
Caption
数学
TextBox
Text1
Text
86
TextBox
Text2
Text
91
CommandButton
Command1
Caption
平均成绩
===================第2套,选择题=================
第1题
执行下面的VB程序段后，A的值是（）。
DimAAsInteger
DimBAsInteger
A=11
B=9
IfAPrint"A=";A
A:
2
B:
11
C:
9
D:
7
答案:
B
第2题
下面关于算法的认识正确的是（）。
A:
算法是解决问题的方法和步骤
B:
算法一定没有输出
C:
算法就是计算机程序
D:
算法的步骤可以是无限的
答案:
A
第3题
在VB语言中，"Print2>2"输出结果是（）。
A:
0
B:
1
C:
True
D:
False
答案:
D
第4题
在VB语言中，不能使用“Next”作为变量名的原因是（）。
A:
使用了关键字
B:
后面没有使用数字
C:
使用了英文单词
D:
由英文字母开头
答案:
A
第5题
数学表达式"
"，对应的VB表达式是（）。
A:
n-1/（m＋2）
B:
（n-1）/m＋2
C:
（n-1）/（m＋2）
D:
n-1/m＋2
答案:
C
第6题
函数Abs（-1.9）返回的值是（）。
A:
2
B:
1.9
C:
-1.9
D:
-2
答案:
B
第7题
在VB语言中，下面不是合法的运算符的是（）。
A:
≠
B:
*
C:
\
D:
/
答案:
A
第8题
在VB语言中，表示"50>y>-50"的正确表达式是（）。
A:
50>y>-50
B:
50>yandy>-50
C:
50>yory>-50
D:
50>yory<-50
答案:
B
第9题
如图所示的流程图为求x的绝对值算法。
根据算法，流程图中①处的内容是（）。
A:
x<1
B:
x>1
C:
x<=0
D:
x>=0
答案:
D
第10题
在VB语言中，下列正确的赋值语句是（）。
A:
2-1=x
B:
x+y-2=c
C:
x=y+c
D:
2*x=3*y
答案:
C
=======================第2套,操作题====================
第1题
编写程序：
打开"考生目录VB\233"文件夹中的文件：
"k2-2.vbp"进行以下操作后并保存！
在窗体"Form1.frm"的"Command1_Click"事件中编写代码（请不要随便更改其它代码），使之能够实现如下功能：
在Text1输入整数a、Text2输入整数b，判断一元二次方程
有无实数根。
并在Text3文本框中显示判断结果，即有实数根则在Text3文本框中输出"有"，否则输出"无"。
测试数据
在Text1文本框中输入1，在Text2文本框中输入5，Text3文本框输出有；
在Text1文本框中输入2，在Text2文本框中输入2，Text3文本框输出无；
第2题
程序填充：
打开"考生目录VB\234"文件夹中的文件：
"k2-3.vbp"进行以下操作后并保存！
在VB代码窗口指定位置修改完善程序代码实现，求1到100之间能被7整除的个数。
第3题
界面设计：
新建一个VB工程，工程文件名称为：
“工程1.vbp”，并添加一个窗体文件：
“Form1.frm”，保存在“考生文件夹VB\232\”文件夹下。
按下表的要求添加控件，并设置其属性，操作后保存！
对象
对象名
属性名
属性值
Label
Label1
Caption
身高
Label
Label2
Caption
体重
TextBox
Text1
Text
1.75
TextBox
Text2
Text
70
CommandButton
Command1
Caption
判断
===================第3套,选择题=================
第1题
执行下面的VB程序段后，A的值是（）。
DimAAsInteger
DimBAsInteger
A=7
B=-9
IfAPrint"A=";A
A:
2
B:
11
C:
9
D:
7
答案:
D
第2题
下面关于算法的认识正确的是（）。
A:
算法有一个或多个的输出
B:
算法就是求解“鸡兔同笼问题”
C:
算法就是计算机程序
D:
算法的步骤可以是无限的
答案:
A
第3题
在VB语言中，"Print2<2"输出结果是（）。
A:
0
B:
1
C:
True
D:
False
答案:
D
第4题
在VB语言中，不能使用“Print”作为变量名的原因是（）。
A:
使用了关键字
B:
后面没有使用数字
C:
使用了英文单词
D:
由英文字母开头
答案:
A
第5题
数学表达式“
”，对应的VB表达式是（）。
A:
y-x/（x＋y）
B:
（y-x）/x＋y
C:
（y-x）/（x＋y）
D:
y-x/x＋y
答案:
C
第6题
函数Abs（1.9）返回的值是（）。
A:
2
B:
1.9
C:
-1.9
D:
-2
答案:
B
第7题
在VB语言中，下面不是合法的运算符的是（）。
A:
≈
B:
*
C:
\
D:
/
答案:
A
第8题
在VB语言中，表示"7>y>-5"的正确表达式是（）。
A:
7>y>-5
B:
7>yandy>-5
C:
7>yory>-5
D:
7>yory<-5
答案:
B
第9题
如图所示的流程图为求x的绝对值算法。
根据算法，流程图中①处的内容是（）。
A:
y=0
B:
y=1
C:
y=-x
D:
y=x
答案:
D
第10题
在VB语言中，下列正确的赋值语句是（）。
A:
9-5=x
B:
x+y-2=0
C:
y=c
D:
2x=3*y
答案:
C
=======================第3套,操作题====================
第1题
编写程序：
打开"考生目录VB\236"文件夹中的文件：
"k3-2.vbp"进行以下操作后并保存！
在窗体"Form1.frm"的"Command1_Click"事件中编写代码（请不要随便更改其它代码），使之能够实现如下功能：
在Text1输入整数a、Text2输入整数b，判断一元二次方程
有无实数根。
并在Text3文本框中显示判断结果，即有实数根则在Text3文本框中输出"有"，否则输出"无"。
测试数据
在Text1文本框中输入1，在Text2文本框中输入2，Text3文本框输出有；
在Text1文本框中输入1，在Text2文本框中输入1，Text3文本框输出无；
第2题
程序填充：
打开"考生目录VB\237"文件夹中的文件：
"k3-3.vbp"进行以下操作后并保存！
在VB代码窗口指定位置修改完善程序代码实现，求1到100之间能被7整除的个数
第3题
界面设计：
新建一个VB工程，工程文件名称为：
“工程1.vbp”，并添加一个窗体文件：
“Form1.frm”，保存在“考生文件夹VB\235\”文件夹下。
按下表的要求添加控件，并设置其属性，操作后保存！
对象
对象名
属性名
属性值
Label
Label1
Caption
姓名
Label
Label2
Caption
体重
TextBox
Text1
Text
林岭
TextBox
Text2
Text
70
CommandButton
Command1
Caption
提交
===================第4套,选择题=================
第1题
执行下面的VB程序段后，A的值是（）。
DimAAsInteger
DimBAsInteger
A=-11
B=2
IfAPrint"A=";A
A:
2
B:
11
C:
9
D:
7
答案:
A
第2题
下面关于算法的认识正确的是（）。
A:
算法就是求解“鸡兔同笼问题”
B:
算法一定没有输出
C:
算法就是计算机程序
D:
算法的步骤必须是有限的
答案:
D
第3题
在VB语言中，"Print2<>2"输出结果是（）。
A:
0
B:
1
C:
True
D:
False
答案:
D
第4题
在VB语言中，不能使用“For”作为变量名的原因是（）。
A:
使用了关键字
B:
后面没有使用数字
C:
使用了英文单词
D:
由英文字母开头
答案:
A
第5题
数学表达式“
”，对应的VB表达式是（）。
A:
y-x/5a
B:
（y-x）/5a
C:
（y-x）/5/a
D:
y-x/5/a
答案:
C
第6题
函数Abs（1.9）返回的值是（）。
A:
1
B:
1.9
C:
-1.9
D:
-1
答案:
B
第7题
在VB语言中，下面不是合法的运算符的是（）。
A:
±
B:
*
C:
\
D:
/
答案:
A
第8题
在VB语言中，表示"10>x>-50"的正确表达式是（）。
A:
10>x>-50
B:
10>xandx>-50
C:
10>xorx>-50
D:
10>xorx<-50
答案:
B
第9题
如图所示的流程图为求x的绝对值算法。
根据算法，流程图中①处的内容是（）。
A:
y=0
B:
y=1
C:
y=-x
D:
y=x
答案:
C
第10题
在VB语言中，下列正确的赋值语句是（）。
A:
5-1=x
B:
x=y-2
C:
x+y+c
D:
2*x=3
答案:
B
=======================第4套,操作题====================
第1题
编写程序：
打开"考生目录VB\239"文件夹中的文件：
"k4-2.vbp"进行以下操作后并保存！
在窗体"Form1.frm"的"Command1_Click"事件中编写代码（请不要随便更改其它代码），使之能够实现如下功能：
在Text1输入整数a、Text2输入整数b，判断一元二次方程
有无实数根。
并在Text3文本框中显示判断结果，即有实数根则在Text3文本框中输出"有"，否则输出"无"。
测试数据
在Text1文本框中输入3，在Text2文本框中输入12，Text3文本框输出有；
在Text1文本框中输入9，在Text2文本框中输入12，Text3文本框输出无；
第2题
程序填充：
打开"考生目录VB\240"文件夹中的文件：
"k4-3.vbp"进行以下操作后并保存！
在VB代码窗口指定位置修改完善程序代码实现，求1到100之间能被11整除的个数。
第3题
界面设计：
新建一个VB工程，工程文件名称为：
“工程1.vbp”，并添加一个窗体文件：
“Form1.frm”，保存在“考生文件夹VB\238\”文件夹下。
按下表的要求添加控件，并设置其属性，操作后保存！
对象
对象名
属性名
属性值
Label
Label1
Caption
货品名
Label
Label2
Caption
单价
TextBox
Text1
Text
电视机
TextBox
Text2
Text
970
CommandButton
Command1
Caption
提交
升级会员 