作者a10111 (postcoital depression)
看板NTU-GIIB2005
标题[公告] 要抽柜子的记得缴交名单给我喔
时间Sat Oct 8 23:46:36 2005
可以站上寄信给我
或是EMAIL
[email protected]
以下是抽奖程式码
用MATLAB 欢迎测试
有疑点都可以提出来^^
==============================================
a=zeros(1,24); %存放中奖组别的阵列
i=1;
n=36; %参赛组数 可以乱改
while i<=24
b=ceil(n*rand(1,1)); %产生1~n的乱数
k=0;
for j=1:i %检查有无重复
if a(j)==b
k=1;
end
end
if k==0
a(i)=b;
i=i+1;
end
end
c=sort(a); %由小到大排序
disp(c);
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 61.64.207.247
1F：→ a10111:其实目前也只有24组登记@@ 有谁要跟我一起报一队的阿? 10/09 00:09
※ 编辑: a10111 来自: 61.64.207.247 (10/09 00:12)
2F：→ Chyibin:好熟悉的程式码...大学的旧伤又复发了XD 10/11 14:03