如何编写程序解决问题

如何编写程序解决问题第一页，共二十六页，编辑于2023年，星期二编程之前要了解的概念算法变量语句第二页，共二十六页，编辑于2023年，星期二设计算法首先分析和了解问题，确定问题的输入和输出数据，然后确定如何从输入数据得到输出数据的算法不同的程序设计语言细节（语法）不同，方法相同算法就是用计算机求解某一问题的方法，是能被机械地执行的动作或指令的有穷集合第三页，共二十六页，编辑于2023年，星期二在实际操作中，我们考虑算法应该从三方面入手：题目中输入项（已知）有哪些？题目中输出项（未知）有哪些？如何由输入项得到输出项？例：求半径为r的圆的周长和面积分析：1。输入项是半径(r)2.输出项是圆的周长（c）和面积(s)3.c=2*3.14*rs=3.14*r*r但是！这不是算法！第四页，共二十六页，编辑于2023年，星期二考虑分析后，根据解决问题的顺序写出算法输入半径计算圆的周长计算圆的面积输出圆的周长和面积有了算法后，按照算法编写程序，简单说就是将算法的步骤都用vb语言来实现即可！第五页，共二十六页，编辑于2023年，星期二练习：试写出以下问题算法P40实践（2）P40练习（1）P8练习（1）（2）第六页，共二十六页，编辑于2023年，星期二P40实践（2）输入时间tV=v0+a*tS=v0*t+0.5*a*t*t输出V，S第七页，共二十六页，编辑于2023年，星期二P40练习（1）输入两点的平面坐标（x1,y1,x2,y2）距离d=sqr((x1-x2)^2+(y1-y2)^2)输出距离d第八页，共二十六页，编辑于2023年，星期二P8练习（1）输入实数a如果a>=0,那么绝对值b=a,否则b=-a输出绝对值b第九页，共二十六页，编辑于2023年，星期二P8练习（2）分析：输入量为三个数n1,n2,n3;输出量为max;得到输出量的方法是比较。一次只能比较两个数，将较大的数赋值给max,三个数经过两次比较就可以得到结果。第十页，共二十六页，编辑于2023年，星期二输入三个数n1,n2,n3.将n1与n2中较大的数存于max将min与n3中较大的数存于max输出max第十一页，共二十六页，编辑于2023年，星期二变量在程序处理数据时，对于输入的数据、参加运算的数据、运行结果等临时数据，通常把它们暂时存储在计算机的内存中。变量就是命名的内存单元位置。输入量和输出量都是变量对变量的操作有：变量说明dimaassingle赋值a=b*3a=inputbox(“”)输出printa第十二页，共二十六页，编辑于2023年，星期二变量说明一个变量由三部分定义变量的名称要保存的信息类型要保存的信息本身语句格式：Dim变量名as数据类型[,变量名as数据类型]用户定义系统定义Dimaasinteger,bassingleDimsasstring第十三页，共二十六页，编辑于2023年，星期二变量名的命名规则必须以字母开头其余部分可包含字母、数字、下划线不能超过255个字符不能是VB的保留字以下哪些是合法的变量名？A%555,5hd,b70,a_099,integer,print,print_aaa,sub：['intidʒə]

第十四页，共二十六页，编辑于2023年，星期二VB定义的常用的基本数据类型数据类型类型说明符取值范围整型数Integer['intidʒə]

-32768到32767长整型数Long-2147483648到2147483647单精度实型数Single-3.102823E+38到3.402823E38双精度实型数Double<|10308|的有效数字日期型Date(Time)公元100年1月1日~9999年12月31日时间：00：00~23：59：59字符型String逻辑型（布尔型）BooleanTrue或False第十五页，共二十六页，编辑于2023年，星期二赋值语句赋值语句的基本格式：变量=表达式如:(1)a=30(2)a=2*9(3)a=a+10(4)a=b观察以下语句组，想想运行结果是什么？作用是计算出表达式的值，赋给左边的变量第十六页，共二十六页，编辑于2023年，星期二PrivateSubCommand1_Click()DimaAsInteger,bAsIntegera=5b=20a=a+bb=a-ba=a-bPrint"a=";a,"b=";bEndSub第十七页，共二十六页，编辑于2023年，星期二PrivateSubCommand1_Click()DimaAssingle,bAssingle,tassinglea=inputbox(“请输入第一个数”)b=inputbox(“请输入第二个数”)Print"a=";a,"b=";bt=aa=bb=tPrint"a=";a,"b=";bEndSubt=bb=aa=t第十八页，共二十六页，编辑于2023年，星期二输入语句输入语句的作用是由键盘输入给某一个变量赋值，它是赋值语句和输入函数的结合，如：a=InputBox(“a=”,“输入头数”)Inputbox()是提供从键盘输入数据的函数，返回值是字符串类型Inputbox()的语法格式是：Inputbox(提示信息[，标题][，默认值][，位置])其中，提示信息和标题是双引号引起来的字符串第十九页，共二十六页，编辑于2023年，星期二输出语句Print是输出数据的一个方法，基本格式是：print输出内容说明：如果输出的内容是数、变量、表达式，则输出的是数、变量、表达式的值。如果是用引号引起来的字符串，则原样输出。输出内容可以是一个或多个。如果是多个输出内容，则各个内容之间可以用逗号或分号分隔。用分号分隔，后面一个内容紧跟前面一个内容输出；用逗号分隔，则按照分区格式输出（间隔开）如果输出内容后面没有符号，则表示下一个print换行输出；如果print中没有输出内容，则表示输出一个空行。第二十页，共二十六页，编辑于2023年，星期二Y=x*3在print语句后，则不是赋值语句，而是关系表达式，其值是布尔型（true或false）PrivateSubCommand1_Click()x=2.5y=x*3Print“y=x*3"Printy=x*3Printx*3Printx,yPrinty*4+5Print"x=";x,"y=";yEndSub输出内容是用引号引起来的字符串，则原样输出输出内容是表达式，则输出的是表达式的值输出内容是变量，则输出的是变量的值第二十一页，共二十六页，编辑于2023年，星期二PrivateSubCommand2_Click()Dimn1AsSingle,n2AsSingle,n3AsSingle,minAsSinglen1=InputBox("","请输入第一个数")n2=InputBox("","请输入第二个数")n3=InputBox("","请输入第三个数")Ifn1>n2Thenmin=n2Elsemin=n1Ifmin>n3Thenmin=n3EndSubPrint"三个数是：";n1;n2;n3;"最小的数是：";min第二十二页，共二十六页，编辑于2023年，星期二开始编写程序！能写出某个问题的算法，再加上对相关语句的了解，就可以用VB来解决这个问题了！第二十三页，共二十六页，编辑于2023年，星期二读程序写结果:1.privatesubcommand1_click()DIMaasinteger,basinteger,zasintegera=val(inputbox(“”))b=val(inputbox(“”))z=aa=bb=zprinta,bEndsub______________2.privatesubcommand1_click()DIMaasinteger,basintegera=12b=4c=a>bprintcendsub______________当依次输入200和300时运行结果是？true第二十四页，共二十六页，编辑于2023年，星期二3.privatesubcommand1_click()X=2Ifx>10thenValue=x*3ElseValue=x*4EndifPrintValueEndsub_________________

4.privatesubcommand1_click()a=val(inputbox(“”))b=val(inputbox(“”))c=val(inputbox(“”))Ifa<bthenm=ae