查看單個文章
舊 2005-08-31, 04:32 AM   #3 (permalink)
getter
管理員
 
getter 的頭像
榮譽勳章
UID - 6433
在線等級: 級別:96 | 在線時長:9733小時 | 升級還需:64小時級別:96 | 在線時長:9733小時 | 升級還需:64小時級別:96 | 在線時長:9733小時 | 升級還需:64小時級別:96 | 在線時長:9733小時 | 升級還需:64小時級別:96 | 在線時長:9733小時 | 升級還需:64小時級別:96 | 在線時長:9733小時 | 升級還需:64小時
註冊日期: 2002-12-08
住址: 天線星球
文章: 8157
精華: 0
現金: 19955 金幣
資產: 765391 金幣
預設

#include "stdio.h"
#include "stdlib.h"
#define random(num) (rand() % (num)) /* random 取亂數 */
#define randomize() srand((unsigned)time(NULL)) /* randomize 清除取亂數種子表 */
#define clrscr() system("CLS") /* 畫面清除 */
#define pause() system("PAUSE") /* 暫停畫面 */

/*
dist[6] : given distribution of each number's appearances
result[n] : simulation result
n : rolling a dice n times
*/
void rolling(int dist[6], int result[][2], int n) {
int i,c;

randomize();

for(i=0;i<n;i++)
{
c=random(6);
result[i][0]=i+1;
result[i][1]=dist[c];
}
}

void print(int dist[6],int vals[][2], int len) {
int i;
int cnt[6]={0};
int index;

/* for(i=0; i<6; i++) */
/* cnt[i]=0; */

clrscr();
printf("Rolling result : ");

for(i=0;i<6;i++)
printf("(%d) ",dist[i]);

printf("\n");

for(i=0; i<len; i++) {
printf("(%3d,%2d) ",vals[i][0],vals[i][1]);

/* int index=vals[i][0]-1; */

index=vals[i][1]-1;
cnt[index]++;
}
printf("\n");

for(i=0; i<6; i++) {
printf("\tdice(%d) = %4.1f \n",i+1,(double)cnt[i]/len*100);
}

printf("\n");
pause();
}

int main(){

const int n=100;
int dices[n][2];
int dist1[] = {3,3,3,6,6,12};
int dist2[] = {6,3,6,1,1,12};
int dist3[] = {1,1,2,1,1,4};


srand(time(NULL));
rolling(dist1,dices,n);
print(dist1,dices,n);
rolling(dist2,dices,n);
print(dist2,dices,n);
rolling(dist3,dices,n);
print(dist3,dices,n);
}
__________________
在「專業主討論區」中的問題解決後,要記得按一下 http://forum.slime.com.tw/images/stamps/is_solved.gif 按鈕喔,
這是一種禮貌動作。

一樣是在「專業主討論區」中發問,不管問題解決與否,都要回應別人的回答文喔。
不然搞 [斷頭文],只看不回應,下次被別人列入黑名單就不要怪人喔。

天線寶寶說再見啦~ ... 天線寶寶說再見啦~

迪西:「再見~ 再見~」

Otaku Culture Party 關心您 ...
getter 目前離線  
送花文章: 37855, 收花文章: 6441 篇, 收花: 26052 次
回覆時引用此帖