[例程]任务分块多线程执行(分块大小决定线程数)

空竹

小白学习..大神飘过..

  

变量名	类 型	静态	数组	备 注
sum	整数型
b	整数型
n	整数型
first	整数型
last	整数型
分块数	整数型
分块大小	整数型

sum ＝ 到整数 (编辑框2.内容)
分块大小 ＝ 到整数 (编辑框1.内容)
分块数 ＝ sum ÷ 分块大小
b ＝ sum ％ 分块大小
如果真 (b ＞ 0)
分块数 ＝ 分块数 ＋ 1
计次循环首 (分块数, n)
first ＝ 1 + (n － 1) × 分块大小
如果 (n ＝ 分块数)
last ＝ last ＋ b
last ＝ n × 分块大小

线程_启动多参_整数型 (&工作线程, first, last, , , , )
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 sum, 整数型<br /> .局部变量 b, 整数型<br /> .局部变量 n, 整数型<br /> .局部变量 first, 整数型<br /> .局部变量 last, 整数型<br /> .局部变量 分块数, 整数型<br /> .局部变量 分块大小, 整数型<br /> <br /> sum ＝ 到整数 (编辑框2.内容)<br /> 分块大小 ＝ 到整数 (编辑框1.内容)<br /> 分块数 ＝ sum ÷ 分块大小<br /> b ＝ sum ％ 分块大小<br /> .如果真 (b ＞ 0)<br />         分块数 ＝ 分块数 ＋ 1<br /> .如果真结束<br /> .计次循环首 (分块数, n)<br />     first ＝ 1 + (n － 1) × 分块大小<br />     .如果 (n ＝ 分块数)<br />         last ＝ last ＋ b<br />     .否则<br />         last ＝ n × 分块大小<br /> <br />     .如果结束<br /> <br />     线程_启动多参_整数型 (&工作线程, first, last, , , , )<br /> <br /> .计次循环尾 ()

来自群组: 热心网友

pipicool

学习一下

sostemp

谢谢楼主分享

烈焰029雨魔

非常感谢分享！！！！！

kanhaiyouyue

老板能否给个完整的源码，上传附件

杨明煜

值得学习............

sanclyj

任务分块多线程执行

lqylbh

任务分块多线程执行

壹啵

老板能否给个完整的源码，上传附件

letmin

感谢分享，很给力！~