比如求1406和646的最大公因子,可使用如下计算步骤: 1406=2*646+114 →646=5*114+76 →114=1*76+38
→76=2*38+0 ,所以1406和646的最大公因子为38。程序如下,请在空白处填上合适内容。
Dim A as Long,B as Long,R as Long
A=inputbox(“请输入A的值”)
B=inputbox(“请输入B的值”)
Do
R= ①
A=B
B=R
Loop Until ②
Print “最大公约数=”; ③
参考答案:
①A mod B(或者:A-(A\B)*B) ② R=0 (或者:Not R<>0) ③ A
(2)程序设计(7分)
这是一个用选择排序法对数组A(n)进行排序的子程序。请完成子程序的设计,要求将数组A中的数据从小到大排序。提示:数组的最小下标为0,最大下标可用UBOUND(A)函数获取,其中A为数组名称。
Public Sub Sort(ByRef A() As Single)
Dim I as Integer, J as Integer, N as integer, M as Integer
Dim T as Single
N=Ubound(A)
For I=0 to N-1
Min=A(I):M=I
For J=i+1 to N
If A(J)<Min then Min=A(J):M=J
Next J
T=A(I):A(I)=Min:A(M)=T
Next I
End Sub
第十二套
标题为:高中信息技术试卷及参考答案
专业基础知识部分
一、选择题(45分,每小题1.5分。每小题只有一个最符合题意的答案。)
1.信息技术课程目标可归纳为知识与技能、过程与方法、情感态度与价值观三个方面。下面属于过程与方法的目标是( )。
(A)理解信息及信息技术的概念与特征
(B)能熟练使用常用的信息技术工具,初步形成自主学习信息技术的能力
(C)能根据任务的要求,确定所需信息的类型和来源
(D)能辩证地认识信息技术对社会发展、科技进步和日常生活学习的影响
2.对于任务驱动教学法的基本环节,以下各环节的顺序安排最恰当的是( )。
①提出学习任务 ②设置任务情境 ③归纳总结,感悟提升 ④探究学习,完成任务 ⑤巩固练习
(A)①②④③⑤ (B)②①③④⑤ (C)②①④⑤③ (D)②①⑤④③
3.在Windows中,需要查找以n开头且扩展名为.com的所有文件,在查找对话框内的名称框中应输入( )。
(A)n.com (B)n?.com (C)com.n* (D)n*.com
4.通常所说的ADSL是指( )。
(A)上网方式 (B)电脑品牌 (C)网络服务商 (D)网页制作技术
5.在VB中,用于改变对象标题的属性是( )。
(A)Backcolor (B)Name (C)Forecolor (D)Caption
6.某图像的尺寸为