用vb。NET算
张丘建《算经》中提出“百鸡问题”：鸡翁一值钱五，鸡母一值钱三，鸡雏三值钱一。百钱买百鸡，问鸡翁、母、雏各几何？
Dim ix As Integer '鸡翁
Dim iy As Integer '鸡母
Dim iz As Integer '鸡雏
For ix = 0 To 19
For iy = 0 To 33
iz = 100 - iy - ix
If (5 * ix + 3 * iy + iz / 3) = 100 Then
TextBox1.Text = ix
TextBox2.Text = iy
TextBox3.Text = iz
End If
Next
Next
