delphi 将100个数字平均分布到600个数组里
100个数字分布到数组hm[0..9,0..99]里
就是十条记录
每条记录里60个数字
要求每个数字使用6次（不能多也不能少）
100个数字是0到99
语文考试不及格
有没看懂的可以问下我
数组的总大小为1000，剩余地400做啥处理？
剩下的不处理啊
比如数字是53
那么hm[i,53]就等于1
不然就等于0
随机分布？有序分布？总得有点算法吧。
随机分布
随机分布
1. 定义变量用来保存每个数字的使用次数
array[0..99] of integer;
当然也可能是array[1..100]，看你的“100个数字”是0~99还是1~100，使用前初始化到全0
2. 定义变量用来保存每条记录内的数字计数
array[0..9] of integer;
使用前初始化到全0
3. 定义变量来保存数字被引用的总次数用来控制循环
integer;
使用前初始化到0
4. 初始化随机数种子。
Randomize;
5. 用while do循环，条件为数字的总引用计数 <600
6. 在循环体内随机生成
a. 数字（Random(100)或者Random(100)+1）
b. 记录序号（Ramdom(10)）
7. 检查该数字在1中定义的引用计数，应小于6，检查记录指定位置状态，应为0，如2条件满足，则该数字引用计数+1，总引用计数+1，记录的相应位置置位为1。
8. 重复循环。
Delphi(Pasc
相关问答：
请教各路高手。武林前辈。我将B.EXE做成资源文件，然后加到123.dll中。用A.EXE来调用123.dll中的B.EXE
请各位前辈帮忙指教下。A.exe如何来调用dll中的exe？代码又该如何写？
无人回答？
做成资源� ......
IF THEN ELSE中多个条件怎么写，如：字符串S1，S2，S3，S4均要不为空。
怎么样把它写到IF中去？
请各位帮帮忙，谢谢！
if (S1<>'') and (S2<>'') and (S3<>'') and (S4<>'') then
begin ......
delphi如何获取网页的返回状态，就像浏览器中返回的http 500错误，404错误等
另外能不能获取到打开一个网页的反应时间，可以大致参考网页打开的速度
谢谢！
都可以实现的，具体的你还是查资料吧！
自己 ......
一直想使用dll，但delphi的dll子窗体经常有各种问题，比如主窗口与dll子窗口的焦点问题，子窗口中控件的tab键、热键、enter键等的问题，子窗口退出的问题、平面按钮问题等等，网站上进行了搜索，没有比较完美的解决� ......
大家好：
我目前要开发一个ERP中的BOM工时汇总程序，在ORACLE中，BOM表的结构是传统的 父件 子件 式的，工时在另一个表中，可以用left outer join来关联，可以认为，关联后的表结构为 [父件] [ ......
