来自范子彦的问题
【编写程序,求“鸡兔同笼”问题.鸡有2只脚,兔有4只脚,如果已知鸡和兔的总头数为h,总脚数为f,问笼中鸡和兔各有多少只?】
编写程序,求“鸡兔同笼”问题.鸡有2只脚,兔有4只脚,如果已知鸡和兔的总头数为h,总脚数为f,问笼中鸡和兔各有多少只?
1回答
2020-08-0106:41
【编写程序,求“鸡兔同笼”问题.鸡有2只脚,兔有4只脚,如果已知鸡和兔的总头数为h,总脚数为f,问笼中鸡和兔各有多少只?】
编写程序,求“鸡兔同笼”问题.鸡有2只脚,兔有4只脚,如果已知鸡和兔的总头数为h,总脚数为f,问笼中鸡和兔各有多少只?
PrivateSubcmd1_Click()
DimxAsInteger
DimyAsInteger
h=Val(Text1.Text)
f=Val(Text2.Text)
x=2*h-f/2
y=f/2-h
MsgBox"鸡的只数为:"&x&vbCrLf&"兔子的只数为:"&y
EndSub