vb计算求解： 100个人吃一百个馒头，大人一人吃四个，小孩四人吃一个，求有大人和小人各多少？ 用vbscript

vb计算求解： 100个人吃一百个馒头，大人一人吃四个，小孩四人吃一个，求有大人和小人各多少？ 用vbscript

这题有确定的答案，用不着程序处理啊。
如果用程序处理的话，大人最多25个（一人吃4个，总共就100个），要满足100人的话，小孩最少75，所以
<script language=vbscript>
dim intL '大人个数
dim intS '小孩个数

for intS = 75 to 100
for intL = 0 to 25
if (intS + intL = 100) and (intS mod 4 = 0) and (4 * intL + intS / 4 = 100) then
msgbox "大人 ＝ " & intL & " 小孩 ＝ " & intS
end if
next
next
</script>

假设全是大人： 100×4＝400 400－100＝300 小孩300÷﹙4﹣1／4）＝80 大人100－80＝20

<script language=vbscript> dim xh for xh = 0 to 100 if xh / 4 + (100 - xh) * 4 = 100 then msgbox "大人：" & 100 - xh & " 小孩：" & xh end if next </script>

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息