我国古代数学家张丘建在其著名的《算经》中提出了百鸡问题:每只公鸡5元,每只母 鸡3元,三只雏鸡1元;如何用100元买100只鸡,即公鸡、母鸡、雏鸡各多少只。请在空白处 填入适当的内容,将程序补充完整。   Private Sub Commandl_Clic

admin2009-01-15  23

问题 我国古代数学家张丘建在其著名的《算经》中提出了百鸡问题:每只公鸡5元,每只母
鸡3元,三只雏鸡1元;如何用100元买100只鸡,即公鸡、母鸡、雏鸡各多少只。请在空白处
填入适当的内容,将程序补充完整。
  Private Sub Commandl_Click()
   Dim Cock As Integer
   Dim Hen As Integer
   Dim Chick As Integer
   Forml.Print“公鸡数”,“母鸡数”,“雏鸡数”
   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

解析 在该题中运用了循环语句的嵌套,即多重循环。从题目来看,【  】需要填入的是一个条件语句,即满足百鸡问题的数的条件。如果满足条件就在窗体上显示出来,应填入的语句是:Cock + Hen + Chick = 100 And 5 * Cock + 3 * Hen + ch/3;100。注意:Do While |Until…Loop语句和Do…While | Until语句。
转载请注明原文地址:https://kaotiyun.com/show/Id2p777K
0

最新回复(0)