/***************************************************************/
/* ヒストグラム作成用変数 hist[] の初期化
埋めてね */

/***************************************************************/
は
for(i=0;i<DMAX;hist[i++]=0);

/***************************************************************/
/* 乱数を引いて, 結果に応じて hist[] を更新
埋めてね */

/**************************************************************/
は
hist[(int)(6*get_uniform_random())]++;


かと