- 1、本文档共76页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
1-1、算法及程序实现专题(学考部分)教程
专题算法及程序实现;1、算法的基本概念;2、算法的常用表示方法;3、算法流程的三种控制结构;例2. 下列问题不能用算法描述的是 ( )
A.已知a、b、c的值,求一元二次方程ax +bx+c=0(a≠0) 的实数根
B.计算某个班级学生身高的平均值
C.列出方程y=2x+1的所有实数解
D.根据三角形三边长度求三角形面积;;1、基本概念;常见属性名及其含义;对象;2、VB的基本数据类型、常量、变量、数组和常用标准函数;( );例:Const pi=3.14;例:下列可以作为VB变量名的是( )
A.3D B.x_y C.x+y D.π;④数组变量;例:读程序写结果;算术类;函数名;1.在Visual Basic中,表达式Abs(-3.6) * Sqr(100)的值是 ( )
(A)36 (B)360 (C)-36 (D)-360;3、三种基本结构;;【例2】在Visual Basic中,给变量a,b,c均赋值为1,则下列语句正确的是( )
(A)a = 1, b = 1,c = 1(B)a = 1: b = 1: c = 1
(C)a = 1; b = 1;c = 1(D)a = b = c = 1;块格式:If 〈条件表达式〉Then
语句块
End If;块格式:If 条件表达式 Then
语句块1
Else
语句块2
End If
行格式:If 条件表达式 Then 语句块1 Else 语句块2;;3. If…Then …Else If… 结构 ;开始;For 循环变量=初值 To 终值 Step 步长
语句块
Next 循环变量
; For…Next循环程序举例;x = 2
For y = 1 To 8 Step 3 x = x + y
Next y
Text1.Text=Str(x);; 2. Do While … Loop语句; Do While…Loop循环程序举例;已知T=1+2+3+…+N,求T500的最小值,并输出N的值。;说明:在使用Do语句时,必须注意条件表达式中的变量值的变化方式。一般情况下,在循环过程中,必须至少有一次条件表达式的计算结果为假,否则将会出现无限循环的情况。;解析算法是指用解析的方法找出表示问题的前提条件与结果之间关系的数学表达式,并通过表达式的计算来实现问题求解。;【例题1】计算并联电阻的总阻值(一)
把2个电阻的两端分别连在一起,称为“2个电阻的并联”。;【例题2】一元二次方程求解
一元二次方程ax2+bx+c=0(a≠0),输入方程系数a、b、c,求方程的解。
根据一元二次方程的求解方法,首先需要判别b2-4ac的结果是大于0、小于0还是等于0,然后才能用求根公式进行计算。
所以我们需要使用选择模式,根据条件判别的不同结果,输出两个解、一个解、“无解”。;枚举算法就是按照问题本身的性质,一一列举出该问题所有可能的解,并在逐一列举的过程中,检验每个可能的解是否是问题真正的解,若是,我们采纳它,否则,抛弃它。
设计枚举算法时要在尽可能小的范围内罗列出所有可能的情况,不能遗漏,也不能重复。;【例1】装箱问题:包装1200个变形金刚,要求是:
(1)包装规格分别是:小盒(每盒5个)和大盒(每盒12个);
(2)每种规格的盒数可任意,但每盒都必须装满。
分析:5X+12Y=1200;【例2】小明的126邮箱密码忘记了,但他还零星记得有关于密码的一些信息:
(1)密码是八位数字,前面两位为19;
(2)最后两位数字是91;
(3)能被77和133整除。
程序界面如图所示,单击“寻找密码”按钮(Command1)后,可能的密码显示在列表框List1中。; 解决此问题的相应程序如下:
Private Sub Command1_Click()
Dim i As Long, s As Long
For i = 0 To 9999
s = ①
If s Mod 77 = 0 And s Mod 133 = 0 Then
?? ②
End If
Next i
End Sub;( )
您可能关注的文档
- 1-2桩基础工程质量监理通则教程.doc
- 1-2电动机单向运行控制教程.ppt
- 1-3月视讯会议报告教程.pptx
- 宏观经济与增长方式转变.ppt
- 学习情境一 汽车材料基础知识.ppt
- 宏观经济学术语(中英文对照).doc
- 天水市旅游商品设计研究.doc
- 宏观经济学09经济增长理论.ppt
- 宏达公司应收账款管理失败案例分析.doc
- 宝钢股份-标准成本制度.ppt
- 《GBT36067-2018信息与文献引文数据库数据加工规则》(2025版)深度解析.pptx
- 《GBT36112-2018政务服务中心服务现场管理规范》(2025版)深度解析.pptx
- 2025届内蒙古呼和浩特市高三上学期第一次质量监测-英语试卷(含答案).docx
- 《GBT36068-2018中国机读馆藏格式》(2025版)深度解析.pptx
- 生产管理和成本管理战略与技巧实务专题.pptx
- 企业固定资产管理培训.pptx
- 周志华《西瓜书》课件.pptx
- 《GBT36113-2018政务服务中心服务投诉处置规范》(2025版)深度解析.pptx
- 企业项目管理的特征.ppt
- 护理交接班优秀个案分析.pptx
最近下载
- (二模)南京市、盐城市2025届高三年级第二次模拟考试 数学试题卷(含答案).pdf
- 建筑工程图集 07MS101:市政给水管道工程及附属设施.pdf VIP
- 《形势与政策2025春》题库答案(10).doc VIP
- 初中英语课堂小组合作学习研究课题.docx VIP
- 绳索取芯培训(概括).ppt
- Shimano禧玛诺渔具 电动轮PLAYS 3000 3000XP(03980 03620)说明书.pdf
- 大学语文 课件(何)18看蒙娜丽莎看.ppt
- 2024年贵州全国高中数学联赛预赛竞赛数学试卷.doc
- 预制场专项安全检查表.docx
- Unit1 第2课时Speed up Fuel up(教学设计)-三年级英语下册(外研版三起2024).docx
文档评论(0)