求"掷色子"的C语言算法,或代码...

是“掷骰子”吧？！！这是掷骰子的程序：题目是这样子的：编写一个模拟掷骰子的程序，每个骰子从1-6，所以两个骰子组合运州数从2-12，随机投掷10000次，打印所有组合出现的概率！

#include<iostream.h>

#include<乱悄滚time.h>

#include<stdlib.h>

void

main()

{

int

i=0

float

a[13]={0}

srand((unsigned)time(null))

int

num1=0,num2=0

for(i=1i<=10000i++)

{

num1=rand()%6+1

num2=rand()%6+1

a[num1+num2]++

a[0]++

}

for(i=2i<=12i++)

{

cout<<i<<'

'<哗余<'

'

cout<<(a[i]/a[0])*100<<'%'

cout<<endl

}

}

我这是 .NET 2015 的：

Public 你的选择 As Boolean

Public 掷色子数 As Integer

Public 你的本金 As Integer

Public 你的投注 As Integer

Public 色子结果 As Boolean

Private Sub 开始按钮_Click(sender As Object, e As EventArgs) Handles 开始按钮.Click

Randomize()

你的投注 = CInt(扣除标签.Text)

你的本金冲仔 = CInt(本金标签谨缓.Text)

If 你的投注 >你的本金 Then

MsgBox("你投注过大！")

你的投注 = 0

扣除标签.Text = 0

Exit Sub

ElseIf 你的投注 <= 你的本金

If 大选项.Checked = True Then

你的散晌汪选择 = True

Else

你的选择 = False

End If

掷色子数 = CInt(Int((6 * Rnd()) + 1))

色子数.Text = 掷色子数

If 掷色子数 >= 4 Then

色子结果 = True

Else

色子结果 = False

End If

If 色子结果 = 你的选择 Then

你的本金 += 你的投注 * 2

Else

你的本金 -= 你的投注

End If

本金标签.Text = 你的本金.ToString

End If

End Sub

---