24小时热门版块排行榜    

查看: 1957  |  回复: 14
当前主题已经存档。
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

yy5393

金虫 (小有名气)

[交流] 【求助】如何生成没有重复的随机数

我想在1-2500之间生成200个没有重复的随机数,我编了好长时间都不对,哪位虫友知道指点一下或者有类似的程序分享一下,真是不胜感激啊!
回复此楼
伟大都是熬出来的!
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

duyingchun

银虫 (小有名气)


小木虫(金币+0.5):给个红包,谢谢回帖交流
#include
#include

char RandomData[2500];
int   ActureData[200];

void InitData()
{
memset(RandomData,0,2500);
}

void CreatData()
{
int Num=0;
int Data;
while(Num<200)
     {
      Data=random(2500);
      if(RandomData[Data])   continue;
      RandomData[Data]=1;
      ActureData[Num++]=Data;
     }
}

void main()
{
randomize();
InitData();
CreateData();
}

200个随机数字存在ActureData数组里,没有排过序,如果需要排序的话,修改下CreateData函数如下:
void CreateData()
{
int Num=0,index=0;
int Data;
while(Num<200)
     {
      Data=random(2500);
      if(RandomData[Data])   continue;
      RandomData[Data]=1;
      Num++;
     }

Num=0;

while(index<200)
     {
      if(RandomData[Num])  ActureData[index++]=Num;
      Num++;
     }
}

[ Last edited by duyingchun on 2009-6-1 at 14:14 ]
10楼2009-06-01 14:03:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 15 个回答

woshilsh

荣誉版主 (职业作家)

优秀版主


sunxiao(金币+1,VIP+0):不要不行,呵呵 4-2 23:21
不要BB,呵呵,兄弟在Fortran下生成随机数?

想不重复,你可以找出重复的,剔除,然后把不重复的加进去,咋样?

方法笨了点,但有效哇!
[center][url=http://www.91cool.net/][img]http://id.91cool.net/sign/?name=小木虫印&amp;amp;amp;say=各位版主辛苦了![/img][/url][/center]
2楼2009-04-02 22:17:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

windhair

铜虫 (小有名气)

★ ★ ★ ★
sunxiao(金币+3,VIP+0):谢谢参与交流,欢迎常来仿真编程版 4-2 23:21
yy5393(金币+1,VIP+0):谢谢 4-3 16:07
要生成不同随机数,就要改变seed, 而要seed 不同,最简单的方法就是用系统时间做seed
F90 里有现在生成seed的函数吧,查查
3楼2009-04-02 22:36:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lynarcissusly

金虫 (正式写手)


yy5393(金币+1,VIP+0):我试试 4-3 16:07
程序里不是有自带的随机数产生器吗?ran(iseed). iseed是整数,这样产生的随机数是0-1之间的,你自己把它乘以2500就可以了。
4楼2009-04-03 14:10:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[教师之家] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 BnSlaJi8z5Vo 2026-08-17 3/150 2026-08-17 17:38 by CBFiACZS7HAK
[基金申请] 感觉是下周放榜了 +4 angus9576 2026-08-17 8/400 2026-08-17 17:26 by angus9576
[基金申请] filecode=后面第一个是大写字母 +8 wangze12014 2026-08-14 10/500 2026-08-17 17:05 by xter9665
[硕博家园] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +3 EWi2p09MOOv8 2026-08-16 3/150 2026-08-17 16:35 by CBFiACZS7HAK
[基金申请] 欢迎发来filecode的Mz6后的代码验证其规律 +34 医学老男孩 2026-08-13 81/4050 2026-08-17 16:20 by yudaoqian88
[基金申请] 时间戳变了,能看出什么问题? +4 基诺咪客 2026-08-17 4/200 2026-08-17 16:10 by Vivilian
[基金申请] 哪位老哥知道今年的国自然具体哪一天放榜? +12 Ldrop2023 2026-08-13 15/750 2026-08-17 15:02 by 小豌豆_发芽
[考博] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +3 6GojgJvkDudM 2026-08-16 4/200 2026-08-17 13:49 by EYK67XJMj64E
[硕博家园] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 i7NFEVbjQMM5 2026-08-16 4/200 2026-08-17 12:10 by 4GBAYCdVQoK3
[考研] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 6GojgJvkDudM 2026-08-16 4/200 2026-08-17 11:46 by 4GBAYCdVQoK3
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 6GojgJvkDudM 2026-08-16 3/150 2026-08-17 09:49 by xLVPIRuSvCUe
[论文投稿] 岩土工程学报什么时候才能终审完呐 25+3 yeager111 2026-08-10 4/200 2026-08-16 20:42 by tfang
[基金申请] 时间戳又变了8-15 +13 archvillain 2026-08-15 25/1250 2026-08-16 20:13 by zhaosm1982
[基金申请] 咱们一起用铁证分析2026国家社科基金中标与否 +7 启萌科技 2026-08-12 26/1300 2026-08-16 12:35 by 启萌科技
[基金申请] 有时候,自然基金真的不能太认真 (我的申报经验) +10 majunge000 2026-08-11 12/600 2026-08-16 08:18 by xli1984
[基金申请] 各位道友,我要去昆明玩几天,回来见。 +7 Tide man 2026-08-14 8/400 2026-08-15 01:11 by arzu_hma
[基金申请] 是这周出结果还是下周出结果? +4 yuleib84 2026-08-11 4/200 2026-08-14 23:05 by lfy8008
[基金申请] Filecode 又变了,巨变 +3 WH3796 2026-08-12 4/200 2026-08-13 14:13 by 小木虫6752397
[基金申请] 结合人工智能,周易传统文化,filecode打分制来了,3分以上希望很大。 +3 Tide man 2026-08-12 4/200 2026-08-13 08:35 by ZJTJZ
[基金申请] 2019年青年基金涵评意见,大家看看几个A,几个B? +11 Tide man 2026-08-11 11/550 2026-08-13 07:35 by 撸猫猫
信息提示
请填处理意见