啊啊啊啊啊啊啊啊啊啊啊啊啊啊

笨来无一悟

有没有bug没测试

  

子程序名	返回值类型	公开	备 注
随机	长整数型
参数名	类 型	参考	可空	数组	备 注
最小	长整数型
最大	长整数型

返回 (最小 ��� (最大 － 最小) ÷ 10000 × 取随机数 (0, 10000))

.版本 2<br /> <br /> .子程序 随机, 长整数型<br /> .参数 最小, 长整数型<br /> .参数 最大, 长整数型<br /> <br /> 返回 (最小 ＋ (最大 － 最小) ÷ 10000 × 取随机数 (0, 10000))

Suky

冬夏 发表于 2024-6-13 23:51
[e=1]
.版本 2
' 简化了一下，这样也可以

这样写好像是勉强可以，有没有其他问题得再测试

我也写过一个类似这个的版本，但是测试某个范围数的时候感觉不得劲

Suky

冬夏 发表于 2024-6-13 23:45
[e=1]
.版本 2

这写法还是有问题的啊
如果随机单位小于最高位数    那每一位取随机数   上限应该为9而不是最大值的最高位排下来的

冬夏

  

' 简化了一下，这样也可以

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

变量名	类 型	静态	数组	备 注
随机值	文本型
最低位数	整数型
最高位数	整数型
随机一位	整数型
随机单位	整数型
i	整数型
返回值	长整数型

如果真 (最小值 ＝ 最大值)
返回 (0)
置随机数种子 ()
最低位数 ＝ 取文本长度 (到文本 (最小值))
最高位数 ＝ 取文本长度 (到文本 (最大值))
循环判断首 ()
随机一位 ＝ 取随机数 (最低位数, 最高位数)
随机值 ＝ “”
计次循环首 (随机一位, i)
随机单位 ＝ 取随机数 (0, 9)
如果真 (取反 (i ＝ 1 且 随机单位 ＝ 0))
随机值 ＝ 随机值 ＋ 到文本 (随机单位)

计次循环尾 ()
返回值 ＝ 到长整数 (随机值)
循环判断尾 (取反 (返回值 ≥ 最小值 且 返回值 ≤ 最大值))
返回 (返回值)

.版本 2<br /> ' 简化了一下，这样也可以<br /> .子程序 取随机数_长整, 长整数型<br /> .参数 最小值, 长整数型<br /> .参数 最大值, 长整数型<br /> .局部变量 随机值, 文本型<br /> .局部变量 最低位数, 整数型<br /> .局部变量 最高位数, 整数型<br /> .局部变量 随机一位, 整数型<br /> .局部变量 随机单位, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 返回值, 长整数型<br /> <br /> .如果真 (最小值 ＝ 最大值)<br />     返回 (0)<br /> .如果真结束<br /> 置随机数种子 ()<br /> 最低位数 ＝ 取文本长度 (到文本 (最小值))<br /> 最高位数 ＝ 取文本长度 (到文本 (最大值))<br /> .循环判断首 ()<br />     随机一位 ＝ 取随机数 (最低位数, 最高位数)<br />     随机值 ＝ “”<br />     .计次循环首 (随机一位, i)<br />         随机单位 ＝ 取随机数 (0, 9)<br />         .如果真 (取反 (i ＝ 1 且 随机单位 ＝ 0))<br />             随机值 ＝ 随机值 ＋ 到文本 (随机单位)<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br />     返回值 ＝ 到长整数 (随机值)<br /> .循环判断尾 (取反 (返回值 ≥ 最小值 且 返回值 ≤ 最大值))<br /> 返回 (返回值)

冬夏

  

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

变量名	类 型	静态	数组	备 注
随机值	文本型
最低位数	整数型
最高位数	整数型
随机一位	整数型
随机单位	整数型
i	整数型
返回值	长整数型
最大值第一位	文本型

如果真 (最小值 ＝ 最大值)
返回 (0)
置随机数种子 ()
最大值第一位 ＝ 取文本左边 (到文本 (最大值), 1)
最低位数 ＝ 取文本长度 (到文本 (最小值))
最高位数 ＝ 取文本长度 (到文本 (最大值))
循环判断首 ()
随机一位 ＝ 取随机数 (最低位数, 最高位数)
随机值 ＝ “”
计次循环首 (随机一位, i)
随机单位 ＝ 取随机数 (0, 9)
判断循环首 (i ＝ 1 且 随机单位 ＞ 到整数 (最大值第一位))
随机单位 ＝ 取随机数 (0, 9)
判断循环尾 ()
如果真 (取反 (i ＝ 1 且 随机单位 ＝ 0))
随机值 ＝ 随机值 ＋ 到文本 (随机单位)

计次循环尾 ()
返回值 ＝ 到长整数 (随机值)
循环判断尾 (取反 (返回值 ≥ 最小值 且 返回值 ≤ 最大值))
返回 (返回值)

.版本 2<br /> <br /> .子程序 取随机数_长整, 长整数型<br /> .参数 最小值, 长整数型<br /> .参数 最大值, 长整数型<br /> .局部变量 随机值, 文本型<br /> .局部变量 最低位数, 整数型<br /> .局部变量 最高位数, 整数型<br /> .局部变量 随机一位, 整数型<br /> .局部变量 随机单位, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 返回值, 长整数型<br /> .局部变量 最大值第一位, 文本型<br /> <br /> .如果真 (最小值 ＝ 最大值)<br />     返回 (0)<br /> .如果真结束<br /> 置随机数种子 ()<br /> 最大值第一位 ＝ 取文本左边 (到文本 (最大值), 1)<br /> 最低位数 ＝ 取文本长度 (到文本 (最小值))<br /> 最高位数 ＝ 取文本长度 (到文本 (最大值))<br /> .循环判断首 ()<br />     随机一位 ＝ 取随机数 (最低位数, 最高位数)<br />     随机值 ＝ “”<br />     .计次循环首 (随机一位, i)<br />         随机单位 ＝ 取随机数 (0, 9)<br />         .判断循环首 (i ＝ 1 且 随机单位 ＞ 到整数 (最大值第一位))<br />             随机单位 ＝ 取随机数 (0, 9)<br />         .判断循环尾 ()<br />         .如果真 (取反 (i ＝ 1 且 随机单位 ＝ 0))<br />             随机值 ＝ 随机值 ＋ 到文本 (随机单位)<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br />     返回值 ＝ 到长整数 (随机值)<br /> .循环判断尾 (取反 (返回值 ≥ 最小值 且 返回值 ≤ 最大值))<br /> 返回 (返回值)

Suky

笨来无一悟 发表于 2024-6-13 23:12
实现效果应该是不难的 就是效率

效率这一块应该影响不大    毕竟只是取一个

笨来无一悟

实现效果应该是不难的 就是效率

易酷

遇事不决，可问chatgpt-4

7ian

我的回复怎么不见了

cs潇潇

去提问区提问看看