精易论坛

标题: 数字分类 [打印本页]

---

作者: 大汉子    时间: 2025-1-22 22:37
标题: 数字分类
1.3333
2.4546
3.5464
4.5605
5.1231
8.5656
大于1的有6个，大于2的有5个，大于3的有4个，大于4的有5个，大于6的有1个，大于7的有1个，大于8的有1个。
各位大佬帮忙看看这种的该怎么写

---

作者: 熬夜    时间: 2025-1-22 22:37
222.e (923.25 KB, 下载次数: 4)

2025-1-22 22:57 上传

点击文件名下载附件

---

作者: sdd113    时间: 2025-1-22 23:00

  

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

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

计算数量 ()

子程序名	返回值类型	公开	备 注
计算数量

变量名	类 型	静态	数组	备 注
判断值	整数型		0
Nums	整数型		0
Ary	文本型		0
Count	整数型		2

Ary ＝ 分割文本 ( #常量1, #换行符, )
判断值 ＝ { 1, 2, 3, 4, 5, 6, 7, 8, 9 }
重定义数组 (Nums, 假, 取数组成员数 (判断值))
计次循环首 (取数组成员数 (Ary), Count [1])
计次循环首 (取数组成员数 (判断值), Count [2])
如果真 (到数值 (Ary [Count [1]]) ＞ 判断值 [Count [2]])
Nums [Count [2]] ＝ Nums [Count [2]] ＋ 1

计次循环尾 ()
计次循环尾 ()
计次循环首 (取数组成员数 (判断值), Count [1])
调试输出 (“大于” ＋ 到文本 (判断值 [Count [1]]) ＋ “的有” ＋ 到文本 (Nums [Count [1]]) ＋ “个”)
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 计算数量 ()<br /> <br /> .子程序 计算数量<br /> .局部变量 判断值, 整数型, , "0"<br /> .局部变量 Nums, 整数型, , "0"<br /> .局部变量 Ary, 文本型, , "0"<br /> .局部变量 Count, 整数型, , "2"<br /> <br /> Ary ＝ 分割文本 (#常量1, #换行符, )<br /> <br /> 判断值 ＝ { 1, 2, 3, 4, 5, 6, 7, 8, 9 }<br /> <br /> 重定义数组 (Nums, 假, 取数组成员数 (判断值))<br /> <br /> .计次循环首 (取数组成员数 (Ary), Count [1])<br /> <br />     .计次循环首 (取数组成员数 (判断值), Count [2])<br /> <br />         .如果真 (到数值 (Ary [Count [1]]) ＞ 判断值 [Count [2]])<br />             Nums [Count [2]] ＝ Nums [Count [2]] ＋ 1<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> <br /> .计次循环尾 ()<br /> <br /> <br /> .计次循环首 (取数组成员数 (判断值), Count [1])<br /> <br />     调试输出 (“大于” ＋ 到文本 (判断值 [Count [1]]) ＋ “的有” ＋ 到文本 (Nums [Count [1]]) ＋ “个”)<br /> <br /> .计次循环尾 ()

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4