（精品教育）8.用计算机做科学实验

《（精品教育）8.用计算机做科学实验》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、分支语句学案【学习目标】1、理解分支语句的结构，流程以及作用2、熟悉掌握单分支结构和双分支结构的语法格式。【重难点】1、单分支结构和双分支结构的语法格式。2、流程图【学习内容】1、单分支语句：2、双分支语句if条件then语句Aelse语句Bendifif条件then语句Aendif1、输入一个数到变量a，输出它的绝对值（不用绝对值函数）PrivateSubForm_click()a=InputBox("请输入a的数值")IfThenEndIfPrintaEndSub2、从键盘分别输入两个不相等的数到

2、变量a、b，输出其中较大的数。PrivateSubForm_click()a=InputBox("请输入a的数值")b=InputBox("请输入b的数值")IfThenPrintElsePrintEndIfEndSub3、输入两个不相等的数a，b，比较大小，将大数放在a中，小数放在b中，然后输出a，bPrivateSubForm_click()a=InputBox("请输入a的数值")b=InputBox("请输入b的数值")Printa,bEndSub4、（拓展部分）购买地铁车票，若乘1—4站，3

3、元/位；若乘5—9站，4元/位；若乘10站以上，5元/位；输入人数person、站数n，输出应付款pay。PrivateSubForm_click()n=InputBox("请输入所坐站数n的数值")person=InputBox("请输入人数person的数值")Ifn<=4Thenpay=3*personElseIfn<=9Thenpay=4*personElsepay=5*personEndIfEndIfPrintpay班级小组成员评价者您完成了几个题目□题目1□题目2□题目3□题目4如果没有完

4、成，原因是？您觉得本节课困难之处是？你给自己定的评价等级为□A□B□C□DEndSub