早教吧作业答案频道 -->其他-->
抛硬币vb程序,生成n个随机数,大于0.5代表正面,小于0.5代表反面,统计多次抛硬币后,正反各多少次!生成n个随机数,大于0.5代表正面,小于0.5代表反面,统计多次抛硬币后,正反各多少次!
题目详情
抛硬币vb程序,生成n个随机数,大于0.5代表正面,小于0.5代表反面,统计多次抛硬币后,正反各多少次!
生成n个随机数,大于0.5代表正面,小于0.5代表反面,统计多次抛硬币后,正反各多少次!
生成n个随机数,大于0.5代表正面,小于0.5代表反面,统计多次抛硬币后,正反各多少次!
▼优质解答
答案和解析
Private Sub Command1_Click()
Dim n As Integer
Dim x As Single
Dim a As Integer, b As Integer
Dim i As Integer
n = Val(Text1)
For i = 1 To n
Randomize
x = Rnd
If x > 0.5 Then
a = a + 1
Else
b = b + 1
End If
Next i
Label3.Caption = a
Label4.Caption = b
End Sub
Private Sub Form_Load()
Text1.Text = ""
Label3.Caption = ""
Label4.Caption = ""
End Sub
Dim n As Integer
Dim x As Single
Dim a As Integer, b As Integer
Dim i As Integer
n = Val(Text1)
For i = 1 To n
Randomize
x = Rnd
If x > 0.5 Then
a = a + 1
Else
b = b + 1
End If
Next i
Label3.Caption = a
Label4.Caption = b
End Sub
Private Sub Form_Load()
Text1.Text = ""
Label3.Caption = ""
Label4.Caption = ""
End Sub
看了 抛硬币vb程序,生成n个随机...的网友还看了以下:
下列关于生命系统的结构层次的说法,正确的是()A.生物大分子如蛋白质、核酸属于生命系统的结构层次B 2020-05-02 …
以下关于生命系统结构层次的说法,正确的是()A.生命系统中各生物体均有多种组织和系统B.线粒体不属 2020-05-02 …
生于忧患,死于安乐《孟子》舜发于畎亩之中,傅说举于版筑之间,胶鬲举于鱼盐之中,管夷吾举于士,孙叔敖 2020-05-14 …
植物的次生壁1.次生加厚出来的的部分都是次生壁吗?2.细胞角质化出来的部分是次生壁么?细胞栓质化出 2020-05-15 …
以下哪类化合物属于微生物的次生代谢产物(多选)A.脂肪B.色素C.抗生素D.蛋白质以下哪类化合物属 2020-06-13 …
英语翻译羽毛球诞生于英国,羽毛球比赛规则也诞生于英国,它诞生于1877年,英国于1893年组建了羽 2020-06-20 …
维管射线存在于()A、次生木质部和初失木质部B、初生木质部和初生韧皮部C、次生木质部和次生韧皮部D 2020-06-21 …
下列关于生命系统的叙述,错误的是()A.生物的生活环境不属于生命系统的一部分B.SARS病毒不属于 2020-07-25 …
(2014•北辰区模拟)下列关于生物进化总趋势的叙述,不合理的是()A.从体型小的生物到体型大的生物 2020-11-28 …
下列组合中,依次属于生命系统结构层次中种群、群落和生态系统的一组是()①生活在人的大肠内的细菌等生物 2020-12-07 …