易语言 想实现一个机率问题,不知道如何表达,内容:按千分之的机率执行一次子程序!谢谢!

2025-03-09 10:07:44
推荐回答(1个)
回答1:

.版本 2
.支持库 spec

.子程序 __启动窗口_创建完毕
.局部变量 变量, 整数型

置随机数种子 ()
变量 = 取随机数 (1, 1000)
.如果 (变量 = 1)
调试输出 (“中奖”)
.否则
调试输出 (“谢谢惠顾”)
.如果结束