Pascal语言程序设计教案4–顺序结构程序设计课件及练习题.pptVIP

第三节 顺序结构程序设计 Pascal程序设计初步 简单流程图 ? Pascal程序 试一试 根据下列流程图编写程序 练一练 甲乙两地相距S千米，以速度V千米/小时从甲地步行到乙地，需要的时间t为多少？先画出流程图，再根据流程图编写程序。 * * 开始 输入三角形的底（a）和高（h） 计算三角形的面积S=a×h/2 输出三角形的面积S 结束 program exa03_1; var a,h,s:real; begin read(a,h); s:=a*h/2; write(s); end. 程序首部，表明Pascal程序开始 声明变量 程序执行部分开始 输入三角形底和高 计算三角形面积s 输出三角形面积s 程序执行部分结束 program exa03_1; var a,h,s:real; begin read(a,h); s:=a*h/2; write(s); end. 程序首部，表明Pascal程序开始，程序的名称由用户自定义，可以由字母、数字和下划线组成，但必须由字母或下划线开头，且不得超过63个字符。 声明部分 执行部分开始 输入语句，将键盘上获取到得数据依次存放到括号内的变量中 赋值语句，计算“:=”后面的表达式的值，将结果存放到“:=”前面的变量中 输出语句，将括号内的内容输出 执行部分结束 程序体 执行部分 输入圆的半径（r）和圆周率pi 开始 计算圆的面积S=pi×r×r 周长C=2×pi×r 结束 输出圆的面积S和周长C 开始 输入电流I和电压U 计算电阻R=U/I 结束 输出电阻R 根据下列流程图在右侧文本框中编写程序 program exa03_1; var r,pi ,s,c:real; Begin read(r,pi); s:=pi*r*r; c:=2*pi*r; write(s,c); end. 输入圆的半径（r）和圆周率pi 开始 计算圆的面积S=pi×r×r 周长C=2×pi×r 结束 输出圆的面积S和周长C *