急！！！！！！！！！！！！！1 privatesubcommand1_click()
dimhasinteger,fasinteger
h=val(inputbox("鸡和兔的总头数","请输入",0))
f=val(inputbox("鸡和兔的总脚数","请输入",0))
x=(4*h-f)/2
y=(f-2*h)/2
label1.caption="设笼中鸡和兔的总头数为"&h&",总脚数为"&f&"."
label2.caption="则笼中鸡有"&x&"只,兔有"&y&"只."
endsub<atarget="_blank"><imgsrc="http://pic.wenwen.soso.com/p/20090623/20090623080255-1425559119.jpg"alt="privatesubcommand1_click()
dimhasinteger,fasinteger
h=val(inputbox("鸡和兔的总头数","请输入",0))
f=val(inputbox("鸡和兔的总脚数","请输入",0))
x=(4*h-f)/2
y=(f-2*h)/2
label1.caption="设笼中鸡和兔的总头数为"&h&",总脚数为"&f&"."
label2.caption="则笼中鸡有"&x&"只,兔有"&y&"只."
endsub
"></img></a>
|
