[填空題] 我國(guó)古代數(shù)學(xué)家張丘建在其著名的《算經(jīng)》中提出了百雞問題：每只公雞5元，每只母雞3元，三只雛雞1元；如何用100元買100只雞，即公雞、母雞、雛雞各多少只。請(qǐng)?jiān)诳瞻滋幪钊脒m當(dāng)?shù)膬?nèi)容，將程序補(bǔ)充完整?！　rivate Sub Commandl_Click()　　　Dim Cock As Integer　　　Dim Hen As Integer　　　Dim Chick As Integer　　　Forml．Print“公雞數(shù)”，“母雞數(shù)”，“雛雞數(shù)”　　　For Cock；0 To 20　　　　　For Hen=0 To 33　　　　　　　For Chick=0 To 100　　　　　　　　　If 【】Then　　　　　　　　　　Form1．Print Cock，Hen，Chick　　　　　　　　　End If　　　　　　　Next Chick　　　　 Next Hen　　　Next Cock　　End Sub

Cock + Hen + Chick = 100 And 5 * Cock + 3 * Hen + ch/3 = 100

在該題中運(yùn)用了循環(huán)語(yǔ)句的嵌套，即多重循環(huán)。從題目來(lái)看，需要填入的是一個(gè)條件語(yǔ)句，即滿足百雞問題的數(shù)的條件。如果滿足條件就在窗體上顯示出 來(lái)，應(yīng)填入的語(yǔ)句是：Cock + Hen + Chick = 100 And 5 * Cock + 3 * Hen + ch/3； 100。