下面程序的功能是利用随机函数模拟投币，方法是：每次随机产生一个0或1的整数，相当于一次投币，1代

表正面，0代表反面。在窗体上有三个文本框，名称分别是Text1、Text2、Text3，分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数，如图所示。程序运行后，在文本框Text1中输入总次数，然后单击“开始”按钮，按照输入的次数模拟投币，分别统计出现正面、反面的次数，并显示结果。以下是实现上述功能的程序，请填空。Private Sub Command1_Click() Randomize n = CInt(Text1.Text) n1 = 0 n2 = 0 For i = 1To r = Int(Rnd*2) If r = ____Then n1 = n1+1 Else n2 = n2+1 End If Next Text2.text = n2 Text2.text = n2 End Sub

币，1代表正面，0代表反面。在窗体上有三个文本框，名称分别是Text1、Text2、Text3，分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数，如图所示。程序运行后，在文本框Text1中输入总次数，然后单击“开始”按钮，按照输入的次数模拟投币，分别统计出现正面、反面的次数，并显示结果。以下是实现上述功能的程序，请填空。

Private Sub Command1_Click（）

Randomize

n = CInt（Text1.Text）

n1 = 0

n2 = 0

For I = 1 To ________

r = Int（Rnd*2）

If r = ________ Then

n1 = n1 + 1

Else

n2 = n2 + 1

End If

Next

Text2.Text = n1

Text3.Text = n2

End Sub

法。为此，各种程序设计语言都有产生（伪）随机数的函数。这种函数，每调用一次，就可以获得一个位于区间（0，1）内的数。在程序运行时，多次产生的这些数会均匀地分布在 0、1 之间。在区间（0，1）内均匀分布的含义是指：任取 N 个随机数，当N足够大时， （56） 。应用人员可以利用这种随机数来生成满足指定概率分布的数据，并利用这些数据来模拟实际问题。

为此，各种程序设计语言都有产生(伪)随机数的函数。这种函数，每调用一次，就可以获得一个位于区间(0，1)内的数。在程序运行时，多次产生的这些数会均匀地分布在0，1之间。在区间(0，1)内均匀分布的含义是指：任取N个随机数，当N足够大时，(56)。应用人员可以利用这种随机数来生成满足指定概率分布的数据，并利用这些数据来模拟实际问题。

某程序每获得一对随机数(x，y)，都判断x2+y2≤1是否成立。如果N对随机数中，有m对满足这个不等式，则当N足够大时，数值m/N将会比较接近(57)。

A．必然有一半数小于1/2，有一半数大于1/2

B．大致顺序、等间隔地排列于(0，1)之间

C．其中落在任意子区间(a，b)中的数的比率大致接近于b-a

D．从小到大排序后，各个数都分别位于(0，1)的Ⅳ等分子区间内

下面程序的功能是：根据输入的整数x和n，利用函数fact实现求。 例如：输入：2，3 输出=8 请在程序中的横线上填入正确的内容，将程序补充完整。 /* c7-1.c 利用函数fact实现求x的n次方*/ #include "stdio.h" int main() { long int fact(long x,long n) ; /*声明fact函数*/ long int x ; long int n; printf("please enter X and N(＞=0): "); scanf("%ld,%ld", &x, &n ); printf("%ld,%ld=%ld",x,n, (1) ); /*调用fact函数 */ return 0; } long int fact(long int x, long int n) /*定义fact函数求xn */ { long int i,s; (2) ; /*求累积变量的初始化*/ if (n= =0) return 0; for(i=1; i＜=n; i++) *用循环实现xn* s="s*x;" （3） ; *返回结果xn*＞

程序不完整，请选择适当的内容在下划线处将程序补充完整。 Dim a(100) For j=1 To 100 a(j)=Int(Rnd*501+200)：Print a(j) Next j : Print p=1 : max= ______ For j=2 To 100 If a(j)＞max Then max=a(j) : p=j Next j Print "The largest number is " ; max Print "The position is"; p End

A．0

B．a(1)

C．1.7E+38

D．1.7E-38

A.0．46

B.2．16

C.1．84

D.0．54