一道编程题,用c++ vb c 皆可

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/05/10 10:38:08

一道编程题,用c++ vb c 皆可
利用在区间【0,1】中取值的均匀分布的随机数r模拟一天是否下雨,如果r=3,表示出现了连续3天下雨时间,用变量y=1表示一周内出现连续3天下雨事件,否则y=0
模拟n周,累加每周模拟结果y,得到n周内出现连续3天下雨时间的次数s,于是s/n就是出现连续3天下雨事件的频数,当n充分大时,可以用频数近似概率

Private Sub Command1_Click()
Dim c, y, s, n, i, i1, r As Long
Dim a As String
s = 0
n = Val(Text1.Text)
For i = 1 To n
c = 0
y = 0
For i1 = 1 To 7
Randomize
r = Rnd
If r < 0.3 Then
c = c + 1
End If
If c >= 3 Then y = 1
Next i1
If y = 1 Then s = s + 1
Next i
Label3.Caption = s
a = Str(s / n * 100)Label5.Caption = a & "%"
End Su

用C语言写出一道关于随机数的编程题求大神用C语言帮我编程一道题一道c语言编程题,求教帮我完成一道VB编程题! 求C语言高手帮忙做一道编程题, 一道关于逻辑推理的C语言编程题 c语言的一道关于数组的编程题江湖救急!一道c语言或matlab编程题 A B C D - C D C _____________ A B C 求A、B、C、D的值.用VB编程完成 c语言一道编程题目改错, VB编程～求S=A!+B!+C!阶乘的计算分别用Sub过程和Founcti C语言编程题 -5