整数向上查找

萧楚楠

给个汇编的要不要

zhtcCC

  

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

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

变量名	类 型	静态	数组	备 注
数组_	整数型		0
i	整数型

数组_ ＝ { 50, 51, 65, 65, 80, 88, 125 }
' 取所有
计次循环首 (取数组成员数 (数组_), i)
如果真 (数组_ [i] ＞ 52)
调试输出 (数组_ [i])

计次循环尾 ()
' 取最接近的
数组排序 (数组_, )
计次循环首 (取数组成员数 (数组_), i)
如果真 (数组_ [i] ＞ 52)
' 调试输出 (i, 数组_ [i])
判断 (i ＜ 取数组成员数 (数组_))  ' 不是最后一个数据
如果真 (数组_ [i] ＝ 数组_ [i ＋ 1])
调试输出 (数组_ [i], 数组_ [i ＋ 1])
跳出循环 ()

判断 (i ＝ 取数组成员数 (数组_))  ' 是最后一个数据
调试输出 (数组_ [i])




计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 数组_, 整数型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> 数组_ ＝ { 50, 51, 65, 65, 80, 88, 125 }<br /> ' 取所有<br /> .计次循环首 (取数组成员数 (数组_), i)<br />     .如果真 (数组_ <i> ＞ 52)<br />         调试输出 (数组_ <i>)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> ' 取最接近的<br /> 数组排序 (数组_, )<br /> .计次循环首 (取数组成员数 (数组_), i)<br />     .如果真 (数组_ <i> ＞ 52)<br />         ' 调试输出 (i, 数组_ <i>)<br />         .判断开始 (i ＜ 取数组成员数 (数组_))  ' 不是最后一个数据<br />             .如果真 (数组_ <i> ＝ 数组_ [i ＋ 1])<br />                 调试输出 (数组_ <i>, 数组_ [i ＋ 1])<br />                 跳出循环 ()<br />             .如果真结束<br /> <br />         .判断 (i ＝ 取数组成员数 (数组_))  ' 是最后一个数据<br />             调试输出 (数组_ <i>)<br />         .默认<br /> <br />         .判断结束<br /> <br />     .如果真结束<br /> <br /> .计次循环尾 ()

zhtcCC

  

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

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

变量名	类 型	静态	数组	备 注
数组_	整数型		0
i	整数型
目标值	整数型
出现次数	整数型

数组_ ＝ { 50, 51, 65, 65, 65, 65, 65, 80, 88, 125 }
' 取所有
计次循环首 (取数组成员数 (数组_), i)
如果真 (数组_ [i] ＞ 52)
调试输出 (数组_ [i])

计次循环尾 ()
' 取最接近的
数组排序 (数组_, )
计次循环首 (取数组成员数 (数组_), i)
如果真 (数组_ [i] ＞ 52)
目标值 ＝ 数组_ [i]
跳出循环 ()

计次循环尾 ()
计次循环首 (取数组成员数 (数组_), i)
如果真 (数组_ [i] ＝ 目标值)
调试输出 (目标值)

计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 数组_, 整数型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 目标值, 整数型<br /> .局部变量 出现次数, 整数型<br /> <br /> 数组_ ＝ { 50, 51, 65, 65, 65, 65, 65, 80, 88, 125 }<br /> ' 取所有<br /> .计次循环首 (取数组成员数 (数组_), i)<br />     .如果真 (数组_ <i> ＞ 52)<br />         调试输出 (数组_ <i>)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> ' 取最接近的<br /> 数组排序 (数组_, )<br /> .计次循环首 (取数组成员数 (数组_), i)<br />     .如果真 (数组_ <i> ＞ 52)<br />         目标值 ＝ 数组_ <i><br />         跳出循环 ()<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> .计次循环首 (取数组成员数 (数组_), i)<br /> <br />     .如果真 (数组_ <i> ＝ 目标值)<br />         调试输出 (目标值)<br />     .如果真结束<br /> <br /> .计次循环尾 ()

补充内容 (2025-8-18 23:09):
刚刚没考虑有多个的情况

黑咖啡

  

变量名	类 型	静态	数组	备 注
数组b	整数型		0
输入a	整数型
m	整数型
结果c	整数型		0

输入a ＝ 52
数组b ＝ { 50, 51, 65, 65, 80, 88, 125 }
数组排序 (数组b, 真)
计次循环首 (取数组成员数 (数组b), m)
判断 (取数组成员数 (结果c) ＝ 0)
如果真 (数组b [m] ＞ 输入a)
加入成员 (结果c, 数组b [m])

判断 (数组b [m] ＝ 结果c [1])
加入成员 (结果c, 数组b [m])
跳出循环 ()


计次循环尾 ()
调试输出 (结果c)

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

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 数组b, 整数型, , "0"<br /> .局部变量 输入a, 整数型<br /> .局部变量 m, 整数型<br /> .局部变量 结果c, 整数型, , "0"<br /> <br /> 输入a ＝ 52<br /> 数组b ＝ { 50, 51, 65, 65, 80, 88, 125 }<br /> 数组排序 (数组b, 真)<br /> .计次循环首 (取数组成员数 (数组b), m)<br />     .判断开始 (取数组成员数 (结果c) ＝ 0)<br />         .如果真 (数组b [m] ＞ 输入a)<br />             加入成员 (结果c, 数组b [m])<br />         .如果真结束<br /> <br />     .默认<br />         .判断开始 (数组b [m] ＝ 结果c [1])<br />             加入成员 (结果c, 数组b [m])<br />         .默认<br />             跳出循环 ()<br />         .判断结束<br /> <br />     .判断结束<br /> <br /> .计次循环尾 ()<br /> 调试输出 (结果c)

萧楚楠

给你个汇编版，速度蛮快的

  

窗口程序集名	保 留	保 留	备 注
程序集1
变量名	类 型	数组	备 注
数组	整数型	0
结果数组	整数型	0

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		请在本子程序中放置易模块初始化代码

_临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
返回 (0)  ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备 注
_临时子程序

' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
加入成员 (数组, 50)
加入成员 (数组, 51)
加入成员 (数组, 65)
加入成员 (数组, 65)
加入成员 (数组, 80)
加入成员 (数组, 88)
加入成员 (数组, 125)
结果数组 ＝ 数组
取大 (数组, 结果数组, 52)
调试输出 (结果数组)

子程序名	返回值类型	公开	备 注
取大
参数名	类 型	参考	可空	数组	备 注
源数组	整数型				用于取出的大数组
存放	整数型				存放结果的数组
比较数	整数型				用于比较的数

置入代码 ({ 139, 69, 8, 139, 0, 139, 85, 12, 139, 18, 133, 192, 116, 35, 133, 210, 116, 31, 139, 72, 4, 133, 201, 116, 24, 87, 49, 255, 139, 92, 136, 8, 59, 93, 16, 126, 5, 137, 92, 186, 8, 71, 73, 117, 239, 137, 122, 4, 95, 93, 194, 12, 0 })

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 程序集1<br /> .程序集变量 数组, 整数型, , "0"<br /> .程序集变量 结果数组, 整数型, , "0"<br /> <br /> .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码<br /> <br /> <br /> _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码<br /> 返回 (0)  ' 可以根据您的需要返回任意数值<br /> <br /> .子程序 _临时子程序<br /> <br /> ' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。<br /> 加入成员 (数组, 50)<br /> 加入成员 (数组, 51)<br /> 加入成员 (数组, 65)<br /> 加入成员 (数组, 65)<br /> 加入成员 (数组, 80)<br /> 加入成员 (数组, 88)<br /> 加入成员 (数组, 125)<br /> 结果数组 ＝ 数组<br /> 取大 (数组, 结果数组, 52)<br /> 调试输出 (结果数组)<br /> <br /> .子程序 取大<br /> .参数 源数组, 整数型, 参考 数组, 用于取出的大数组<br /> .参数 存放, 整数型, 参考 数组, 存放结果的数组<br /> .参数 比较数, 整数型, , 用于比较的数<br /> <br /> 置入代码 ({ 139, 69, 8, 139, 0, 139, 85, 12, 139, 18, 133, 192, 116, 35, 133, 210, 116, 31, 139, 72, 4, 133, 201, 116, 24, 87, 49, 255, 139, 92, 136, 8, 59, 93, 16, 126, 5, 137, 92, 186, 8, 71, 73, 117, 239, 137, 122, 4, 95, 93, 194, 12, 0 })