活动:拓展练习(课堂上使用)
【课 题】 信息技术 选修1算法与程序设计 第1章 第三节 程序和程序设计
【合作探究】
以个人或小组为单位,在A、B、C三题中任选一题,进行练习。
A. 在计算机上执行 教材 P21-P22 活动一“个人理财问题”程序,进一步理解算法与程序的对应关系。21·cn·jy·com
B. 打开“计算用电器用电量”的程序(该程序算法不完整),请按算法要求完成该程序的编写,并在计算机上执行。www.21-cn-jy.com
程序输入:p(某用电器实际功率瓦),t(工作时间分钟数)
程序输出:w (用电量的度数)
计算公式:w = p * t
算法分析: 程序参考:
① 输入某用电器实际功率瓦p
② 输入工作时间分钟数t
③ 跟据公式计算w = p * t
④ 输出用电量结果w
⑧ 结束
C. 打开“计算阶梯电价电费”的程序(该程序并不完整),请按算法要求完成该程序的编写,并在计算机上执行。21cnjy.com
程序输入:w (当月用电量度数)
程序输出:m (当月电费金额)
【参考资料】
备受关注的《湖南省居民生活用电试行阶梯电价方案》 2012年7月1日起执行。 第一档电量不分季节,为每户每月180度及以内的用电量;第二、三档用电量分季节,其中春秋季二档电量为超过180度—350度,三档电量为350度以上。
冬夏季二档电量为超过180度—450度,三档电量为450度以上。
电价方面,根据用电量的不同执行分档电价。具体为:一档电量执行0.588元/度的基准电价;二档电量在基准电价的基础上,每度加价0.05元,为0.638元/度;三档电量在基准电价的基础上,每度加价0.3元,为0.888元/度。
各档次电费标准见下表:
档次
春秋季 标准
(3、4、5、9、10、11月)
冬夏季 标准
(1、2、6、7、8、12月)
对应电价
第一档
≤180度
≤180度
0.588元/度
第二档
>180度,≤350度
>180度,≤450度
二档电量在基准电价的基础上,每度加价0.05元,为0.638元/度
第三档
>350度
>450度
三档电量在基准电价的基础上,每度加价0.3元,为0.888元/度
计算方法举例:
李先生家某月用电量为200度,电费计算如下:
基准电费:200×0.588元/度 = 117.6元,超过第一档电量部分为200-180=20度,
第二档增量电费:20 ×0.05元/度 = 1元
因此,李先生该月电费应为117.6 + 1 = 118.6元。
黄先生8月(注意8月属“冬夏季”标准,二档上限为450度)用电700度,电费计算如下:
基准电费: 700 × 0.588元/度 = 411.6元;
第二档增量电费: 450 - 180 = 270度, 270×0.05元/度 = 13.5元;
第三档增量电费: 700 - 450 = 250度, 250×0.3元/度 = 75元。
因此,黄先生该月电费应为411.6+13.5+75 = 500.1元。
算法分析:
以“冬夏季”电价标准为例,算法可描述如下(仅供参考,还可进一步优化):
① 输入当月用电量度数w
② 如果w≤180,则往下执行③,否则转到④
③ 计算用电量在一档内的电费m,然后转到⑧
④ 如果w≤450,则往下执行⑤,否则转到⑥
⑤ 计算用电量在二档内的电费m,然后转到⑧
⑥ 如果w>450,则往下执行⑦,否则转到⑧
⑦ 计算用电量达到三档的电费m,然后转到⑧
⑧ 输出m的值
程序参考:
Dim w As Double, m As Double
w = InputBox("请输入当月用电量") '①
If w <= 180 Then '②
m = w * 0.588 '③
ElseIf w <= 450 Then '④
m = '⑤ 21世纪教育网版权所有
ElseIf w > 450 Then '⑥
m = w * 0.588 + (450 - 180) * 0.05 + (w - 450) * 0.3 '⑦ 21教育网
End If
MsgBox m '⑧
想一想,如何进一步对该算法进行优化,对程序进行改进。