用vb编写鸡兔同笼,头有35,脚有94计算鸡兔各多少只

tzqgh711206 1年前 已收到1个回答 举报

woshizhu514 幼苗

共回答了20个问题采纳率:85% 举报

Private Sub command1_Click() Dim a%,b%,c%,d% a = CInt(Text1.Text) b = CInt(Text2.Text) For c = 1 To b 2 For d = 1 To b 4 If c + d = a And c * 2 + d * 4 = b Then MsgBox("鸡有" & c & "只" & vbCrLf &...

1年前

9
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 16 q. 0.012 s. - webmaster@yulucn.com