高中信息技术_程序的顺序结构教学课件设计.ppt

2.3.1程序的顺序结构 复习1 流程图： 开始或结束 处理 输入或输出 判断 流程线 问题1 输入长方形的长和宽，输出长方形的周长和面积，写出算法流程图和vb程序。 （1）请写出问题1的流程图 结束 开始 （1）问题1的流程图 周长l=2*（a+b） 面积s=a*b 结束 输入长a、宽b 输出l、s 开始 复习2 常用语句和函数 变量的的定义:Dim变量名As数据类型 输入函数：InputBox() 赋值语句：用“=”实现，左边是变量名右边可以是常量、变量、表达式 输出语句：print””，Print变量名 （2）请写出问题1的vb程序 Private Sub Form_Click() Dim a As Single, b As Single, l As Single, s As Single a = InputBox(a=, 输入长) b = InputBox(b=, 输入宽) l = 2 * (a + b) s = a * b Print 周长l=; l, 面积s=; s End Sub 顺序结构 按书写顺序由上到下一条一条执行 没有分支 没有重复 没有跳转 是一种最基本的程序结构 问题2 读下面的流程图，写出vb程序 x=x+y y=x-y 输入x,y 输出x,y 开始 x=x-y 结束 上面流程图对应的vb程序。 Private Sub Form_Click() Dim x As Single, y As Single, l As Single, s As Single x= InputBox(x=, 输入x) y= InputBox(y=, 输入y) Print x=; x, y=; y x=x+y y=x-y x=x-y Print x=; x, y=; y End Sub 思考？ 上面的程序完成了什么功能？ 上面的程序完成了两个数据的交换 思考？ 还有没有其他算法能完成两个数据的交换 课下作业： 1、请同学们阅读课本33页实现两个数据交换的vb程序，写出该算法的流程图。 2、根据问题1的程序，你能不能写出程序求正方形的周长和面积、长方体的表面积和体积？