取数组内最小的数所在位置

kuangshen1

取数组内最小的数所在位置
[10,8,5,7,6,9,4,3,1,2]

梦想ol

  

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

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

数组 ＝ { 10, 8, 345, 7, 6, 9, 4, 3, 31, 82 }
输出调试文本 (取数组内最小数的位置 (数组))
返回 (0)  ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备 注
取数组内最小数的位置	整数型
参数名	类 型	参考	可空	数组	备 注
数组	整数型

变量名	类 型	静态	数组	备 注
i	整数型
n1	整数型
n2	整数型

n1 ＝ 2147483647
计次循环首 (取数组成员数 (数组), i)
如果真 (数组 [i] ＜ n1)
n1 ＝ 数组 [i]
n2 ＝ i

计次循环尾 ()
如果真 (n2 ＞ 0)
调试输出 (“最小数字：” ＋ 到文本 (n1), “位置：” ＋ 到文本 (n2))
返回 (n2)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码<br /> .局部变量 数组, 整数型, , "0"<br /> <br /> 数组 ＝ { 10, 8, 345, 7, 6, 9, 4, 3, 31, 82 }<br /> 输出调试文本 (取数组内最小数的位置 (数组))<br /> 返回 (0)  ' 可以根据您的需要返回任意数值<br /> <br /> <br /> .子程序 取数组内最小数的位置, 整数型<br /> .参数 数组, 整数型, 数组<br /> .局部变量 i, 整数型<br /> .局部变量 n1, 整数型<br /> .局部变量 n2, 整数型<br /> <br /> n1 ＝ 2147483647<br /> .计次循环首 (取数组成员数 (数组), i)<br />     .如果真 (数组 <i> ＜ n1)<br />         n1 ＝ 数组 <i><br />         n2 ＝ i<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> .如果真 (n2 ＞ 0)<br />     调试输出 (“最小数字：” ＋ 到文本 (n1), “位置：” ＋ 到文本 (n2))<br /> .如果真结束<br /> 返回 (n2)

dfk5zk

.版本 2
.支持库 spec

数组 ＝ { 10, 8, 5, 7, 6, 9, 4, 3, 1, 2 }
数组排序 (数组, 真)
调试输出 (数组 [1])


补充内容 (2021-7-25 23:39):
然后寻找数组

kuangshen1

dfk5zk 发表于 2021-7-25 23:38
.版本 2
.支持库 spec

不一定是1.随机的可能里面没有1

一刀破伤风

kuangshen1 发表于 2021-7-25 23:42
不一定是1.随机的可能里面没有1

解释下楼上的意思
数组数字排序 就是重新排列 从小到大 然后取出数组 [1] 就是最小的那个数字 然后再寻找数组 找到这个最小数的位置

右手胜过左手

  

变量名	类 型	静态	数组	备 注
原始数组	整数型		0
排序数组	整数型		0
i	整数型
n	整数型

原始数组 ＝ { 10, 8, 345, 7, 6, 9, 4, 3, 31, 82 }
复制数组 (排序数组, 原始数组)
数组排序 (排序数组, 真)
计次循环首 (取数组成员数 (排序数组), i)
计次循环首 (取数组成员数 (原始数组), n)
如果真 (排序数组 [i] ＝ 原始数组 [n])
调试输出 (“最小值所在位置：” ＋ 到文本 (n))
返回 ()

计次循环尾 ()
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 原始数组, 整数型, , "0"<br /> .局部变量 排序数组, 整数型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 n, 整数型<br /> <br /> 原始数组 ＝ { 10, 8, 345, 7, 6, 9, 4, 3, 31, 82 }<br /> <br /> 复制数组 (排序数组, 原始数组)<br /> <br /> 数组排序 (排序数组, 真)<br /> <br /> <br /> .计次循环首 (取数组成员数 (排序数组), i)<br /> <br />     .计次循环首 (取数组成员数 (原始数组), n)<br /> <br />         .如果真 (排序数组 <i> ＝ 原始数组 [n])<br />             调试输出 (“最小值所在位置：” ＋ 到文本 (n))<br />             返回 ()<br /> <br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> <br /> .计次循环尾 ()

汉族

复制一个数组 排序一下 然后 对比你的原数组就OK了

风清云游

  

窗口程序集名	保 留	保 留	备 注
程序集1

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

变量名	类 型	静态	数组	备 注
数组			0
a

数组 ＝ { 10, 8, 5, 7, 6, 9, 4, 3, 1, 2 }
a ＝ 数组_取最小数位置 (数组)
调试输出 (数组 [a])
返回 (0)  ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备 注
数组_取最小数位置	整数型
参数名	类 型	参考	可空	数组	备 注
数组

变量名	类 型	静态	数组	备 注
地址
长度
比较
计次
临时
位置

地址 ＝ 取变量数据地址 (数组)
长度 ＝ 指针到整数 (地址 － 4) － 1
比较 ＝ 指针到整数 (地址)
位置 ＝ 1
计次循环首 (长度, 计次)
地址 ＝ 地址 ＋ 4
临时 ＝ 指针到整数 (地址)
如果真 (比较 ＞ 临时)
比较 ＝ 临时
位置 ＝ 计次 ＋ 1

计次循环尾 ()
返回 (位置)

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 程序集1<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> .局部变量 数组, , , "0"<br /> .局部变量 a<br /> <br /> 数组 ＝ { 10, 8, 5, 7, 6, 9, 4, 3, 1, 2 }<br /> a ＝ 数组_取最小数位置 (数组)<br /> 调试输出 (数组 [a])<br /> 返回 (0)  ' 可以根据您的需要返回任意数值<br /> <br /> .子程序 数组_取最小数位置, 整数型<br /> .参数 数组, , 数组<br /> .局部变量 地址<br /> .局部变量 长度<br /> .局部变量 比较<br /> .局部变量 计次<br /> .局部变量 临时<br /> .局部变量 位置<br /> <br /> 地址 ＝ 取变量数据地址 (数组)<br /> 长度 ＝ 指针到整数 (地址 － 4) － 1<br /> 比较 ＝ 指针到整数 (地址)<br /> 位置 ＝ 1<br /> <br /> .计次循环首 (长度, 计次)<br />     地址 ＝ 地址 ＋ 4<br />     临时 ＝ 指针到整数 (地址)<br />     .如果真 (比较 ＞ 临时)<br />         比较 ＝ 临时<br />         位置 ＝ 计次 ＋ 1<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回 (位置)

汉族

  

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

变量名	类 型	静态	数组	备 注
原数组	整数型		0
排序数组	整数型		0
计次	整数型
最小位置

原数组 ＝ { 10, 8, 5, 7, 6, 9, 4, 3, 1, 2 }
复制数组 (排序数组, 原数组)
数组排序 (排序数组, 真)
调试输出 (排序数组)
计次循环首 (取数组成员数 (排序数组), 计次)
如果真 (原数组 [计次] ＝ 排序数组 [1])
最小位置 ＝ 计次
跳出循环 ()

计次循环尾 ()
调试输出 (最小位置)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 原数组, 整数型, , "0"<br /> .局部变量 排序数组, 整数型, , "0"<br /> .局部变量 计次, 整数型<br /> .局部变量 最小位置<br /> <br /> 原数组 ＝ { 10, 8, 5, 7, 6, 9, 4, 3, 1, 2 }<br /> 复制数组 (排序数组, 原数组)<br /> 数组排序 (排序数组, 真)<br /> 调试输出 (排序数组)<br /> .计次循环首 (取数组成员数 (排序数组), 计次)<br />     .如果真 (原数组 [计次] ＝ 排序数组 [1])<br />         最小位置 ＝ 计次<br />         跳出循环 ()<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 调试输出 (最小位置)