pascal语言程序设计教案-分支结构编程练习

第五节分支结构程序设计•现实生活中，事物的发展总是按照一定顺序来进行的，这种顺序反映到程序设计上，叫做顺序结构。•但是，有的时候，事物的发展却不是一帆风顺的，会有各种意外发生，在解决这类问题的时候，我们要尽量把各种情况都考虑进去，针对不同的情况采取不同的措施，这就出现了分支的情况。这种现象反映到程序设计上，就叫做分支结构。2.行李托运问题铁路托运：物品实重不超过50kg的，托运费按0.15元/kg计算，超过50kg的，超过部分按0.1元/kg加收运费，试用流程图表示计费过程。开始输入物品实重WW=50?计算运费S=W×0.15+（W-50）×0.1输出运费S结束是否Programexa01;Varw,s:real;BeginWriteln(‘pleaseenter?Kg:’);Readln(w);Ifw=50Thens:=w*0.15Elses:=w*0.15+(w-50)*0.1;Writeln(s);End.计算运费S=W×0.15作业：•1、对照流程图在TurboPascl中编写程序•2、将程序及运行结果截图粘贴至ppt最后新插入的幻灯片上。•要求：•题目1：测试数据需要三个，任意的正数、负数、0.•题目2：测试数据需要三个，50、任意大于及小于50的数•（上节课作业：“网络课堂作业上传下载找到自己班级文件夹05文件夹下”）••作业提交：“网络课堂作业上传下载找到自己班级文件夹将此ppt改名为“学号姓名.ppt”上传试一试：请写出程序流程图•从键盘读入一个数，判断它的正负。如果大于等于0输出“Itisazhengshu.”，如果小于0输出“Itisafushu.”开始输入一个数NN=0？输出：“Itisazhengshu.”结束是否输出：“Itisafushu.”练一练：超市自动计费程序某超市为了促销，规定：购物不足50元的按原价付款，超过50元的，超过部分按九折付款。请帮超市设计一个程序完成自动计费，写出它的程序流程图。开始输入购物金额AA50？需付款额M=A结束是否需付款额为M=50+（A-50）*0.9试一试：请写出程序流程图•从键盘读入一个数，判断它的正负。如果大于等于0输出“Itisazhengshu.”，如果小于0输出“Itisafushu.”开始输入一个数NN=0？输出：“Itisazhengshu.”结束是否输出：“Itisafushu.”练一练：超市自动计费程序某超市为了促销，规定：购物不足50元的按原价付款，超过50元的，超过部分按九折付款。请帮超市设计一个程序完成自动计费，写出它的程序流程图。开始输入购物金额AA50？需付款额M=A结束是否需付款额为M=50+（A-50）*0.9例：行李托运问题铁路托：物品实重不超过50kg的，托运费按0.15元/kg计算，超过50kg的，超过部分按0.1元/kg加收运费，试用流程图表示计费过程。开始输入物品实重WW=50?计算运费S=W×0.15计算运费S=W×0.15+（W-50）×0.1输出运费S结束是否