一个简单小程序的计算方法，望各位大佬斧正

漩涡

' 一、月完成1800份合格量，获得1500元。
' 二、月完成3600份合格量，获得3200元。
' 如当月完成量不足1800份，按每份0.6元计算。
' 如当月完成量超过1800份而没有达到3600份，这部份按每份0.8元计算。
' 如当月完成量超过3600份，超过部份每份按0.9元计算。
' 每月达到3600份合格的采集员有资格申请当月电费资格，并根据完成数量最多的评出技能之星第一名到第三名分别奖励500元、200元、100元。

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
i	整数型
a	双精度小数型
b	双精度小数型		0

' 一、月完成1800份合格量，获得1500元。
' 二、月完成3600份合格量，获得3200元。
' 如当月完成量不足1800份，按每份0.6元计算。
' 如当月完成量超过1800份而没有达到3600份，这部份按每份0.8元计算。
' 如当月完成量超过3600份，超过部份每份按0.9元计算。
' 每月达到3600份合格的采集员有资格申请当月电费资格，并根据完成数量最多的评出技能之星第一名到第三名分别奖励500元、200元、100元。
置随机数种子 ()
计次循环首 (10, i)
a ＝ count (取随机数 (1000, 9999))
加入成员 (b, a)
计次循环尾 ()
数组排序 (b, 假)
调试输出 (“第一名：” ＋ 到文本 (b [1] ＋ 500) ＋ “   已加500元电费”)
调试输出 (“第二名：” ＋ 到文本 (b [2] ＋ 200) ＋ “   已加200元电费”)
调试输出 (“第三名：” ＋ 到文本 (b [3] ＋ 100) ＋ “   已加100元电费”)

子程序名	返回值类型	公开	备 注
count	双精度小数型
参数名	类 型	参考	可空	数组	备 注
数量	整数型

变量名	类 型	静态	数组	备 注
amount	整数型
sum	双精度小数型

amount ＝ 到整数 (数量)
判断 (amount ＜ 1800)
sum ＝ amount × 0.6
判断 (amount ＝ 1800)
sum ＝ 1500
判断 (amount ＞ 1800 且 amount ＜ 3600)
sum ＝ 1500 ��� (amount － 1800) × 0.8
判断 (amount ＝ 3600)
sum ＝ 3200
判断 (amount ＞ 3600)
sum ＝ 3200 ��� (amount － 3600) × 0.9



返回 (sum)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 a, 双精度小数型<br /> .局部变量 b, 双精度小数型, , "0"<br /> <br /> ' 一、月完成1800份合格量，获得1500元。<br /> ' 二、月完成3600份合格量，获得3200元。<br /> ' 如当月完成量不足1800份，按每份0.6元计算。<br /> ' 如当月完成量超过1800份而没有达到3600份，这部份按每份0.8元计算。<br /> ' 如当月完成量超过3600份，超过部份每份按0.9元计算。<br /> ' 每月达到3600份合格的采集员有资格申请当月电费资格，并根据完成数量最多的评出技能之星第一名到第三名分别奖励500元、200元、100元。<br /> <br /> 置随机数种子 ()<br /> .计次循环首 (10, i)<br />     a ＝ count (取随机数 (1000, 9999))<br />     加入成员 (b, a)<br /> .计次循环尾 ()<br /> 数组排序 (b, 假)<br /> 调试输出 (“第一名：” ＋ 到文本 (b [1] ＋ 500) ＋ “   已加500元电费”)<br /> 调试输出 (“第二名：” ＋ 到文本 (b [2] ＋ 200) ＋ “   已加200元电费”)<br /> 调试输出 (“第三名：” ＋ 到文本 (b [3] ＋ 100) ＋ “   已加100元电费”)<br /> <br /> .子程序 count, 双精度小数型<br /> .参数 数量, 整数型<br /> .局部变量 amount, 整数型<br /> .局部变量 sum, 双精度小数型<br /> <br /> amount ＝ 到整数 (数量)<br /> .判断开始 (amount ＜ 1800)<br />     sum ＝ amount × 0.6<br /> .判断 (amount ＝ 1800)<br />     sum ＝ 1500<br /> .判断 (amount ＞ 1800 且 amount ＜ 3600)<br />     sum ＝ 1500 ＋ (amount － 1800) × 0.8<br /> .判断 (amount ＝ 3600)<br />     sum ＝ 3200<br /> .判断 (amount ＞ 3600)<br />     sum ＝ 3200 ＋ (amount － 3600) × 0.9<br /> .默认<br /> <br /> .判断结束<br /> <br /> 返回 (sum)

ibmtcl88

多看看各位写的学习下

影知

有心就好，怎么样都是好的

dulang

漩涡 发表于 2017-10-31 13:30
你这么说，我会很伤心啊

好吧，那再来拿一个精币，再伤心一会儿，你会习惯的，习惯就好了

WSW120

谢谢楼主谢谢楼主

WSW120

看看看看看看

漩涡

dulang 发表于 2017-10-31 09:51
来拿个精币而已

你这么说，我会很伤心啊

dulang

来拿个精币而已