UC知道VB习题求解?拜谢
来源：百度知道 编辑：UC知道 时间：2024/05/31 05:56:12
以下程序代码在窗体的单击事件过程（From_Click)中编写，结果输入到窗体上．
1.从键盘上输入4个数,编写程序,计算并输入这4个数的和平均值.通过 InputBox函数输入数据，在窗体上显示和及平均值．
2.编写程序，求解鸡兔同笼问题．一个笼子中有鸡X只，兔Y只，每只鸡有2只脚，每只兔有4只脚．今知鸡和兔的总头数为h，总脚数为f．问笼中鸡和兔各若干？
提示：根据数学知识，可以写出如下的联立方程式：
x+y=h (1)
2x+4y=f (2)
(2)式-2*(1)式:2y=f-2h 故 y=(f-2h)/2
4*(1)-(2)式: 2x=4h-f 故 x=(4h-f)/2
3.设a=5, b=2.5, c=7.8, d=3.14, 编程序计算：
y=dab/a+b*c
问题多了点不好意思，本人是啊VB初学者，有很多问题不懂，请包涵
顺便求大哥留下QQ以后可以继续请教．
要过程.及其代码越详细越好.
1.从键盘上输入4个数,编写程序,计算并输入这4个数的和平均值.通过 InputBox函数输入数据，在窗体上显示和及平均值．
2.编写程序，求解鸡兔同笼问题．一个笼子中有鸡X只，兔Y只，每只鸡有2只脚，每只兔有4只脚．今知鸡和兔的总头数为h，总脚数为f．问笼中鸡和兔各若干？
提示：根据数学知识，可以写出如下的联立方程式：
x+y=h (1)
2x+4y=f (2)
(2)式-2*(1)式:2y=f-2h 故 y=(f-2h)/2
4*(1)-(2)式: 2x=4h-f 故 x=(4h-f)/2
3.设a=5, b=2.5, c=7.8, d=3.14, 编程序计算：
y=dab/a+b*c
问题多了点不好意思，本人是啊VB初学者，有很多问题不懂，请包涵
顺便求大哥留下QQ以后可以继续请教．
要过程.及其代码越详细越好.
1.dim s ,i,k
s=0
for i=1 to 4
k=val(inputbox("请输入第"+str(i)+"个数："))
s=s+k
next i
print "和＝";s
print "平均数＝";s/4
2.dim h as integer,f as integer
h=val(inputbox("输入头数："))
f=val(inputbox("输入脚数："))
print "共有鸡";(4*h-f)/2;"只，共有兔";(f-2*h)/2;"只。"
3.dim y,a,b,c,d
a=5
b=2.5
c=7.8
d=3.14
y=d*a*b/a+b*c
print y
第二，第三个问题有啲痴线