求一个简单的Mathematica程序

求一个简单的Mathematica程序
试验内容：模拟抛掷一枚均匀硬币的随机实验(可用0-1随机数来模拟实验结果),取模拟n次掷硬币的随机实验.记录实验结果,观察样本空间的确定性及每次实验结果的偶然性,统计正面出现的次数,并计算正面出现的频率.对不同的实验次数n进行实验,记录下实验结果,通过比较实验的结果,你能得出什么结论?
请发邮箱jingyao1021@163.com