作业帮一个笼子里有鸡,兔若干只,若已知鸡,兔的总头数和总头数,问,鸡,兔各多少只?要求,用VB程序,通过InputBox函数输入鸡,兔的总头数和总脚数,单机窗体时在窗体上显示出鸡,兔各有多少只.大恩不言
来源：学生作业帮助网 编辑：作业帮 时间：2024/07/08 22:08:26
xRKPW.ƭ ނPAjam2JEKB$r?ݻ_t7BÅ}|]^ [l ?TGJNFąSl t[{ejX{!.>/Mj8j>BWXSq
879| "6+p$ΧL:2|gXÅ8y]
2NHqmbhk&V̩ gck$wgeGXNgQ421L ;D|? ,D,Xe=L tq_rkf,E)<@Ag] Q,8Ҁ4.D 㞎Pևv
一个笼子里有鸡,兔若干只,若已知鸡,兔的总头数和总头数,问,鸡,兔各多少只?要求,用VB程序,通过InputBox函数输入鸡,兔的总头数和总脚数,单机窗体时在窗体上显示出鸡,兔各有多少只.大恩不言
一个笼子里有鸡,兔若干只,若已知鸡,兔的总头数和总头数,问,鸡,兔各多少只?要求,用VB程序,通过InputBox函数输入鸡,兔的总头数和总脚数,单机窗体时在窗体上显示出鸡,兔各有多少只.大恩不言谢,
一个笼子里有鸡,兔若干只,若已知鸡,兔的总头数和总头数,问,鸡,兔各多少只?要求,用VB程序,通过InputBox函数输入鸡,兔的总头数和总脚数,单机窗体时在窗体上显示出鸡,兔各有多少只.大恩不言
Private Sub Form_click()
Dim m%,n%,x%,y%
m = InputBox("请输入鸡、兔的总头数")
n = InputBox("请输入鸡、兔的总脚数")
x = (4 * m - n) / 2
y = (n - 2 * m) / 2
Print "鸡有" & x & "只,兔有" & y & "只"
End Sub