搜索
首页 电脑/网络 程序设计 VB

VB的鸡兔同笼问题

鸡和兔在某些方面现代战争笼里,共有腿100条,头40个.问鸡有几只,兔有几只?请问用VB怎样写代码

全部回答

2007-10-28

0 0

    其实这就是求方程组的问题。
     对于方程组 a1X+b1Y=c1 a2X+b2Y=c2 X=(b1*c2-b2*c1)/(b1*a2-b2a1) Y=(c-a1*X)/b1 而里面的abc的值都知道,可以求出 Private Sub Form_Load() 'a1X b1Y = c1 'a2X b2Y = c2 a1 = Val(Text1) b1 = Val(Text2) c1 = Val(Text3) a2 = Val(Text4) b2 = Val(Text5) c2 = Val(Text6) X = (b1 * c2 - b2 * c1) / (b1 * a2 - b2a1) Y = (c - a1 * X) / b1 Print "X="; X Print "Y="; Y End Sub 。

类似问题换一批

热度TOP

相关推荐
加载中...

热点搜索 换一换

电脑/网络
VB
硬件
电脑装机
程序设计
互联网
操作系统/系统故障
笔记本电脑
反病毒
百度
软件
程序设计
VB
数据库
C/C++
汇编语言
JAVA相关
VC++
C#/.NET
其他编程语言
VB
VB
举报
举报原因(必选):
取消确定举报