#include?“stdio.h“

double?grn1（double?udouble?gdouble?*r）??//產(chǎn)生單個隨機數(shù)
{
	int?im;
	double?swvt;
	s=65536.0;?
	w=2053.0;?
	v=13849.0;
	t=0.0;
	for?（i=1;?i<=12;?i++）
	{?
????????*r=（*r）*w+v;?
	????m=（int）（*r/s）;
		*r=*r-m*s;?
		t=t+（*r）/s;
	}
	t=u+g*（t-6.0）;
	return（t）;
	
}

void?grns（double?udouble?gdouble?*rint?ndouble?a[]）???//產(chǎn)生隨機數(shù)數(shù)列
{
	int?ikm;
	double?swvt;
	s=65536.0;?
	w=2053.0;?
	v=13849.0;
	for?（k=0;?k<=n-1;?k++）
	{?
		t=0.0;
		for?（i=1;?i<=12;?i++）
		{?
			*r=（*r）*w+v;?
			m=（int）（*r/s）;
			*r=*r-m*s;?
			t=t+（*r）/s;
		}
		a[k]=u+g*（t-6.0）;
	}
????return;
}

void?main（void）
{?
	//這個代碼是產(chǎn)生單個隨機數(shù)的
	/*
	int?ij;
	double?ugr;
	double?rand_num;
	r=5.0;?u=1.0;?g=1.5;
	printf（“\n“）;
	for?（i=0;?i<=9;?i++）
	{?
		for?（j=0;?j<=4;?j++）
		{
			rand_num?=?grn1（ug&r）;
			printf（“%10.7lf??“rand_num）;
		}
	????printf（“\n“）;
	}
	printf（“\n“）;
	*/

	//下面的代碼是產(chǎn)生隨機數(shù)數(shù)列的
	int?ij;
????double?ugra[30000];??//a數(shù)列用來存儲產(chǎn)生的隨機數(shù)
	FILE?*fp;
????r=3.0;?//設(shè)定隨機數(shù)產(chǎn)生的種子
	u=1.0;?//正態(tài)分布的均值
	g=1.5;?//正態(tài)分布的方差為g的平方
????printf（“\n“）;
????grns（ug&r30000a）;

	fp?=?fopen（“record.txt““w“）;
????for?（i=0;?i<=2999;?i++）
????{?
		for?（j=0;?j<=9;?j++）
	????{
			if?（j==9）
			{
			????printf（“%10.7lf“a[i*5+j]）;
		????????fprintf（fp“%10.7lf“a[i*5+j]）;??//保存到record.txt文件中，便于MATLAB畫圖
			}else{
			????printf（“%10.7lf?“a[i*5+j]）;
		????????fprintf（fp“%10.7lf?“a[i*5+j]）;
			}
	????}
????????printf（“\n“）;
		fprintf（fp“\n“）;
????}
????printf（“\n“）;
	fclose（fp）;
	getchar（）;
}

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件???????4017??2019-05-20?14:55??VS_rand\ConsoleApplication1\ConsoleApplication1\ConsoleApplication1.vcxproj

?????文件????????940??2019-05-20?14:55??VS_rand\ConsoleApplication1\ConsoleApplication1\ConsoleApplication1.vcxproj.filters

?????文件????????710??2019-05-20?15:35??VS_rand\ConsoleApplication1\ConsoleApplication1\Debug\cl.command.1.tlog

?????文件???????1292??2019-05-20?15:35??VS_rand\ConsoleApplication1\ConsoleApplication1\Debug\CL.read.1.tlog

?????文件????????494??2019-05-20?15:35??VS_rand\ConsoleApplication1\ConsoleApplication1\Debug\CL.write.1.tlog

?????文件?????????81??2019-05-20?15:35??VS_rand\ConsoleApplication1\ConsoleApplication1\Debug\ConsoleApplication1.lastbuildstate

?????文件???????1895??2019-05-20?15:35??VS_rand\ConsoleApplication1\ConsoleApplication1\Debug\ConsoleApplication1.log

?????文件??????????2??2019-05-20?15:35??VS_rand\ConsoleApplication1\ConsoleApplication1\Debug\link-cvtres.read.1.tlog

?????文件??????????2??2019-05-20?15:35??VS_rand\ConsoleApplication1\ConsoleApplication1\Debug\link-cvtres.write.1.tlog

?????文件??????????2??2019-05-20?15:35??VS_rand\ConsoleApplication1\ConsoleApplication1\Debug\link-rc.read.1.tlog

?????文件??????????2??2019-05-20?15:35??VS_rand\ConsoleApplication1\ConsoleApplication1\Debug\link-rc.write.1.tlog

?????文件???????1338??2019-05-20?15:35??VS_rand\ConsoleApplication1\ConsoleApplication1\Debug\link.command.1.tlog

?????文件???????2370??2019-05-20?15:35??VS_rand\ConsoleApplication1\ConsoleApplication1\Debug\link.read.1.tlog

?????文件????????646??2019-05-20?15:35??VS_rand\ConsoleApplication1\ConsoleApplication1\Debug\link.write.1.tlog

?????文件???????9828??2019-05-20?15:35??VS_rand\ConsoleApplication1\ConsoleApplication1\Debug\main.obj

?????文件??????27648??2019-05-20?15:35??VS_rand\ConsoleApplication1\ConsoleApplication1\Debug\vc110.idb

?????文件??????77824??2019-05-20?15:35??VS_rand\ConsoleApplication1\ConsoleApplication1\Debug\vc110.pdb

?????文件???????1663??2019-05-20?15:47??VS_rand\ConsoleApplication1\ConsoleApplication1\main.c

?????文件????????168??2019-05-20?15:43??VS_rand\ConsoleApplication1\ConsoleApplication1\plot_rand_number.asv

?????文件????????200??2019-05-20?16:00??VS_rand\ConsoleApplication1\ConsoleApplication1\plot_rand_number.m

?????文件?????333000??2019-05-20?15:35??VS_rand\ConsoleApplication1\ConsoleApplication1\record.txt

?????文件??????39071??2019-05-20?16:01??VS_rand\ConsoleApplication1\ConsoleApplication1\untitled.jpg

?????文件????2031616??2019-05-20?16:06??VS_rand\ConsoleApplication1\ConsoleApplication1.sdf

?????文件????????924??2019-05-20?14:51??VS_rand\ConsoleApplication1\ConsoleApplication1.sln

????..A..H.?????22528??2019-05-20?16:06??VS_rand\ConsoleApplication1\ConsoleApplication1.v11.suo

?????文件??????31744??2019-05-20?15:35??VS_rand\ConsoleApplication1\Debug\ConsoleApplication1.exe

?????文件?????257896??2019-05-20?15:35??VS_rand\ConsoleApplication1\Debug\ConsoleApplication1.ilk

?????文件?????445440??2019-05-20?15:35??VS_rand\ConsoleApplication1\Debug\ConsoleApplication1.pdb

?????文件?????109760??2019-05-20?15:57??VS_rand\微信截圖_20190520155730.png

?????目錄??????????0??2019-05-20?15:35??VS_rand\ConsoleApplication1\ConsoleApplication1\Debug

............此處省略7個文件信息