|
| 阅读上一个主题 :: 阅读下一个主题 |
| 作者 |
 公告：陪审团候选人排序结果 |
 |
云儿
[博客]
[个人文集]
游客
|
|
|
作者：Anonymous 在 罕见奇谈 发贴, 来自 http://www.hjclub.org
截至本日海纳百川论坛时间10时40分，报名参加陪审团的网友共计
20人，名单如下(按报名先后顺序)
WM
不锈钢安魂曲
横江雪浪
2u2m
人之初
weizhi
咱老百姓(真)
牛乐吼
NOEQ
九戒
草虾
someone
北京小左
伯夷
xyzxyz
高寒
广成子
实话实说！！！
不锈钢A
blackwhite
采用淮夷网友发表在本坛2002年9月4日的程序，取随机数根为2003年
10月20日晚 NEW JERSEY LOTTERY PICK 4 结果，即9968，对名单作
随机排序，结果如下：
1 九戒
2 不锈钢安魂曲
3 实话实说！！！
4 xyzxyz
5 weizhi
6 NOEQ
7 牛乐吼
8 someone
9 草虾
10 广成子
11 人之初
12 北京小左
13 伯夷
14 2u2m
15 blackwhite
16 咱老百姓(真)
17 WM
18 横江雪浪
19 不锈钢A
20 高寒
根据排序结果，初步选定前七名网友组成陪审团，他们是：九戒、
不锈钢安魂曲、实话实说！！！、xyzxyz、weizhi、NOEQ、牛乐吼。
上述名单中，纠纷双方各有权拒绝二人，由排序第8至11的网友依
顺序替换。候补陪审员依次为：someone、草虾、广成子、人之初。
请原被告双方就陪审团成员构成作出决定。
2003年10月21日
附录：
下面是淮夷网友发表在本坛2002年9月4日的程序源码，此次仅对候
选人人数和随机数根作了改动，用 Microsoft VC6 编译运行。任何
人均可用此程序验证排序结果。
#include <stdio.h>
#include <stdlib.h>
// We have only 20 candidates
#define POOL_SIZE 20
// seed is the result of NEW JERSEY LOTTERY PICK 4
// in the evening of 20 Oct. 2003. We hard-code it
// here.
#define seed 9968
#define NAMEFILE "names.txt"
#define OUTPUT "output.doc"
#define MAX_NAME_SIZE 40
int main()
{
FILE *fp, *fpo;
int i, j, n; // seed is a constant
wchar_t *names[POOL_SIZE], *jury[POOL_SIZE];
//Allocate the memory
for(i = 0; i < POOL_SIZE; i++)
names[i] = new wchar_t[MAX_NAME_SIZE];
//open the name file
fp = fopen(NAMEFILE, "r");
fpo = fopen(OUTPUT, "w");
if(!fp || !fpo) {
printf("Files open error!\n");
exit(0);
}
//Read the names into the array
//NAMEFILE is saved in a format of one name per line
i = 0;
while(!feof(fp) && i<POOL_SIZE)
fwscanf(fp, L"%S", names[i++]);
fclose(fp);
//test
for(i = 0; i < POOL_SIZE; i++)
fwprintf(fpo, L"%S\n", names[i]);
fwprintf(fpo, L"\n");
//Get the seed
//Don't need to read seed --- it's hard-coded
//printf("Please input the seed:");
//scanf("%i", &seed);
//Set the seed
srand(seed);
//Generate the order
//we will get one name in each iteration
//n is the number of names left in pool
//i is the order of jury candidates
for(i = 0, n = POOL_SIZE; n > 0; n--, i++) {
j = rand() % n;
jury[i] = names[j];
//replace the chosen name by the last available name in the arry
//so that it will not be selected again.
names[j] = names[n - 1];
}
//print out the result
for(i = 0; i < POOL_SIZE; i++)
fwprintf(fpo, L"%i %S\n", i+1, jury[i]);
fclose(fpo);
return 0;
}
作者：Anonymous 在 罕见奇谈 发贴, 来自 http://www.hjclub.org |
|
|
| 返回顶端 |
|
 |
- 法官大人，陪审员如有疑问，是否可向原被告双方提问？没有双方律师交叉质询，有时还真会有疑问 -- 实话实说！！！ - (0 Byte) 2003-10-22 周三, 上午3:50 (109 reads)
- 本斑竹在现有的名单中，拒绝一人 -- 斑竹04 - (178 Byte) 2003-10-22 周三, 上午2:40 (252 reads)
- 本斑竹在现有的名单中，拒绝一人 -- 斑竹04 - (178 Byte) 2003-10-22 周三, 上午2:37 (93 reads)
- 本斑竹在现有的名单中，拒绝一人：牛乐吼 -- 斑竹04 - (102 Byte) 2003-10-22 周三, 上午2:36 (105 reads)
- excuse me, what's the schedule? -- xyzxyz - (0 Byte) 2003-10-22 周三, 上午1:47 (124 reads)
- 问云法官一个技术问题： -- 咱老百姓(真) - (172 Byte) 2003-10-22 周三, 上午1:44 (203 reads)
- Thanks, your honor. 原告拒绝“不锈钢安魂曲”和“九戒” -- 贝苏尼 - (152 Byte) 2003-10-22 周三, 上午1:15 (174 reads)
- 贝苏尼拒绝安魂曲,另外拒绝九戒。 -- 草虾 - (644 Byte) 2003-10-22 周三, 上午12:55 (273 reads)
- 云法官，因为个人原因，我不能参加陪审团，请把我撤下，谢谢给你添麻烦 -- bjxz - (0 Byte) 2003-10-22 周三, 上午12:36 (124 reads)
|
|
|
您不能在本论坛发表新主题
您不能在本论坛回复主题
您不能在本论坛编辑自己的文章
您不能在本论坛删除自己的文章
您不能在本论坛发表投票
您不能在这个论坛添加附件
您不能在这个论坛下载文件
|
based on phpbb, All rights reserved.
|
