使用概率判断1-8个数字其中一个

已注销679935

使用概率判断1-8个数字随机其中一个数，1概率19，2概率19，7概率19，8概率19，5概率9.05，6概率9.05，4概率3.45，3概率2.45

Suky

飞鸟和蝉 发表于 2022-8-24 03:24

  

[/quote]
[e=1].版本 2

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

' 1概率19，2概率19，7概率19，8概率19，5概率9.05，6概率9.05，4概率3.45，3概率2.45

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

变量名	类 型	静态	数组	备 注
目标数组	整数型		0
概率数组	小数型		0
n	整数型
随机数	整数型
k	整数型

目标数组 ＝ { 1, 2, 7, 8, 5, 6, 4, 3 }
概率数组 ＝ { 19, 19, 19, 19, 9.05, 9.05, 3.45, 2.45 }  ' 概率数组，与目标数组成员数必须一致，数组成员下标与目标成员下标需保证一致
置随机数种子 ()
随机数 ＝ 取随机数 (1, 10000)  ' 根据概率精确位数决定随机数取值上限
调试输出 (随机数)
计次循环首 (取数组成员数 (概率数组), n)
k ＝ k ＋ 概率数组 [n] × 100  ' 根据概率位数决定扩倍数，此处为10的2次方
如果真 (是否在区间 (随机数, k － 概率数组 [n] × 100, k))
调试输出 (目标数组 [n])
跳出循环 ()

计次循环尾 ()

子程序名	返回值类型	公开	备 注
是否在区间	逻辑型
参数名	类 型	参考	可空	数组	备 注
X	整数型
P_区间标记1	整数型
P_区间标记2	整数型

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

判断 (P_区间标记1 ＝ P_区间标记2)
返回 (假)
判断 (P_区间标记1 ＜ P_区间标记2)
a ＝ P_区间标记1
b ＝ P_区间标记2
a ＝ P_区间标记2
b ＝ P_区间标记1

判断 (a ＜ X 且 X ≤ b)
返回 (真)
返回 (假)

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

.版本 2<br /> .支持库 spec</blockquote></div><br /> [e=1].版本 2<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> ' 1概率19，2概率19，7概率19，8概率19，5概率9.05，6概率9.05，4概率3.45，3概率2.45<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 目标数组, 整数型, , "0"<br /> .局部变量 概率数组, 小数型, , "0"<br /> .局部变量 n, 整数型<br /> .局部变量 随机数, 整数型<br /> .局部变量 k, 整数型<br /> <br /> 目标数组 ＝ { 1, 2, 7, 8, 5, 6, 4, 3 }<br /> 概率数组 ＝ { 19, 19, 19, 19, 9.05, 9.05, 3.45, 2.45 }  ' 概率数组，与目标数组成员数必须一致，数组成员下标与目标成员下标需保证一致<br /> 置随机数种子 ()<br /> 随机数 ＝ 取随机数 (1, 10000)  ' 根据概率精确位数决定随机数取值上限<br /> 调试输出 (随机数)<br /> .计次循环首 (取数组成员数 (概率数组), n)<br />     k ＝ k ＋ 概率数组 [n] × 100  ' 根据概率位数决定扩倍数，此处为10的2次方<br />     .如果真 (是否在区间 (随机数, k － 概率数组 [n] × 100, k))<br />         调试输出 (目标数组 [n])<br />         跳出循环 ()<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> .子程序 是否在区间, 逻辑型<br /> .参数 X, 整数型<br /> .参数 P_区间标记1, 整数型<br /> .参数 P_区间标记2, 整数型<br /> .局部变量 a, 整数型<br /> .局部变量 b, 整数型<br /> <br /> .判断开始 (P_区间标记1 ＝ P_区间标记2)<br />     返回 (假)<br /> .判断 (P_区间标记1 ＜ P_区间标记2)<br />     a ＝ P_区间标记1<br />     b ＝ P_区间标记2<br /> .默认<br />     a ＝ P_区间标记2<br />     b ＝ P_区间标记1<br /> .判断结束<br /> <br /> .判断开始 (a ＜ X 且 X ≤ b)<br />     返回 (真)<br /> .默认<br />     返回 (假)

这样差不多了     不需要额外判断第一个概率，前面多情了

afd

你随机取1到100，然后判断值是1-19就返回1， 值是20-38就返回2

已注销679935

afd 发表于 2022-8-24 02:39
你随机取1到100，然后判断值是1-19就返回1， 值是20-38就返回2

那1-8的数字有1000多个然后可以使用文本_取出现次数 提取出每个数字的次数然后怎么将每个数字从我发的那个内容里的那个概率然后判断出每个数字的概率

Ls60

demo.e (899.88 KB, 下载次数: 10)

2022-8-24 03:00 上传

点击文件名下载附件

Suky

  

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

变量名	类 型	静态	数组	备 注
目标数组	整数型		0
概率数组	小数型		0
n	整数型
随机数	整数型
k	整数型

目标数组 ＝ { 1, 2, 7, 8, 5, 6, 4, 3 }
概率数组 ＝ { 19, 19, 19, 19, 9.05, 9.05, 3.45, 2.45 }
置随机数种子 ()
随机数 ＝ 取随机数 (1, 10000)
调试输出 (随机数)
计次循环首 (取数组成员数 (概率数组), n)
k ＝ k ＋ 概率数组 [n] × 100
判断 (n ＝ 1)
如果真 (是否在区间 (随机数, 1, k))
调试输出 (目标数组 [n])
跳出循环 ()

如果真 (是否在区间 (随机数, k － 概率数组 [n] × 100, k))
调试输出 (目标数组 [n])
跳出循环 ()


计次循环尾 ()

子程序名	返回值类型	公开	备 注
是否在区间	逻辑型
参数名	类 型	参考	可空	数组	备 注
X	整数型
P_区间标记1	整数型
P_区间标记2	整数型

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

判断 (P_区间标记1 ＝ P_区间标记2)
返回 (假)
判断 (P_区间标记1 ＜ P_区间标记2)
a ＝ P_区间标记1
b ＝ P_区间标记2
a ＝ P_区间标记2
b ＝ P_区间标记1

判断 (a ＜ X 且 X ≤ b)
返回 (真)
返回 (假)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 目标数组, 整数型, , "0"<br /> .局部变量 概率数组, 小数型, , "0"<br /> .局部变量 n, 整数型<br /> .局部变量 随机数, 整数型<br /> .局部变量 k, 整数型<br /> <br /> 目标数组 ＝ { 1, 2, 7, 8, 5, 6, 4, 3 }<br /> 概率数组 ＝ { 19, 19, 19, 19, 9.05, 9.05, 3.45, 2.45 }<br /> 置随机数种子 ()<br /> 随机数 ＝ 取随机数 (1, 10000)<br /> 调试输出 (随机数)<br /> .计次循环首 (取数组成员数 (概率数组), n)<br />     k ＝ k ＋ 概率数组 [n] × 100<br />     .判断开始 (n ＝ 1)<br />         .如果真 (是否在区间 (随机数, 1, k))<br />             调试输出 (目标数组 [n])<br />             跳出循环 ()<br />         .如果真结束<br /> <br />     .默认<br />         .如果真 (是否在区间 (随机数, k － 概率数组 [n] × 100, k))<br />             调试输出 (目标数组 [n])<br />             跳出循环 ()<br />         .如果真结束<br /> <br />     .判断结束<br /> <br /> .计次循环尾 ()<br /> <br /> .子程序 是否在区间, 逻辑型<br /> .参数 X, 整数型<br /> .参数 P_区间标记1, 整数型<br /> .参数 P_区间标记2, 整数型<br /> .局部变量 a, 整数型<br /> .局部变量 b, 整数型<br /> <br /> .判断开始 (P_区间标记1 ＝ P_区间标记2)<br />     返回 (假)<br /> .判断 (P_区间标记1 ＜ P_区间标记2)<br />     a ＝ P_区间标记1<br />     b ＝ P_区间标记2<br /> .默认<br />     a ＝ P_区间标记2<br />     b ＝ P_区间标记1<br /> .判断结束<br /> <br /> .判断开始 (a ＜ X 且 X ≤ b)<br />     返回 (真)<br /> .默认<br />     返回 (假)