设为首页收藏本站
开启辅助访问 切换到窄版
搜索
第一问答网»论坛 › 中问网 › 问答 › 一只笼中鸡x只，兔y只，今知鸡兔总头数为h，总脚数为f， ...

一只笼中鸡x只，兔y只，今知鸡兔总头数为h，总脚数为f，问鸡，兔各多少？

[复制链接]
查看11 | 回复4 | 2009-2-24 23:16:57 | 显示全部楼层 |阅读模式
Y=(F-2H)/2
X=(4H-F)/2用inputbox函数输入h，f值..

回复

使用道具 举报

千问 | 2009-2-24 23:16:57 | 显示全部楼层
F=2X乘4Y...
回复

使用道具 举报

千问 | 2009-2-24 23:16:57 | 显示全部楼层
Dim h, f, x, yh = InputBox("输入鸡兔总头数")f = InputBox("输入鸡兔总脚数")x = 2 * h - f / 2y = f / 2 - hPrint "笼中鸡" & x & "只，兔" & y & "只"...
回复

使用道具 举报

千问 | 2009-2-24 23:16:57 | 显示全部楼层
dim i,jfor x=0 to f/2for y=h-x to 0 step -1if y*4 +x*2=f then print "x=";x;" y=";y:exit fornext ynext x...
回复

使用道具 举报

千问 | 2009-2-24 23:16:57 | 显示全部楼层
我小学没毕业...
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

千问

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
回复楼主 返回列表
热门排行