首页 > 计算机 > 计算机考试 正文

[填空题] 本程序的功能是利用随机数函数模拟投币,方法是:每次随机产生一个0或1的整数,相当于—次投币,1代表正面,0代表反面。在窗体上有三个文本框,名称分别是Text1、Text2、Text3,分别

时间:2021-07-20 16:32:54 解答: 75 次

[填空题] 本程序的功能是利用随机数函数模拟投币,方法是:每次随机产生一个0或1的整数,相当于—次投币,1代表正面,0代表反面。在窗体上有三个文本框,名称分别是Text1、Text2、Text3,分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数,如图所示。程序运行后,在文本框Text1中输入总次数,然后单击“开始”按钮,按照输入的次数模拟投币,分别统计出现正面、反面的次数,并显示结果。以下是实现上述功能的程序,请填空。 Private Sub Command1_Click( ) Randomize n=CInt(Text1.Text) n1=0 n2=0 For i=1To 【6】 r=Int(Rnd*2) If r= 【7】 Then n1=n1+1 Else n2=n2+1 End If Next Tcxt2.Text=n1 Text3.Text=n2 End Sub

正确答案:

[6]n或CInt(Text1.Text)或CInt(Text1)或Text1.Text或Val(Text1.Text)或Val

参考解析:

(Text1)或Text1 [7]1 [6]由于执行次数由n决定,故For i循环的终值为n,即总次数有多少,就要执行多少次For i循环。所以本处填:n或其他等价项目。 “Rnd*2”随机产生0与1之间的数,Int函数对“Rnd*1”的返回值只有0与1两种情况。由于Text2用来接受正面(即1)的次数,故在[7]处要填1,即当“r=1”时,变量n1加一次。

  • 相关题库

请充值VIP继续使用(未注册用户支付后会自动注册登录)

×

95元 29元

VIP截止日期:2025-01-03 01:52:32

←请使用支付宝扫码支付

95元 29元

VIP截止日期:2025-01-03 01:52:32

←请使用微信扫码支付