中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net  论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
« [1] [2] »
作者:
标题: 百钱买百鸡,共有几种买法 上一主题 | 下一主题
anqing
高级用户




积分 859
发帖 413
注册 2006-8-14
状态 离线
『楼 主』:  百钱买百鸡,共有几种买法

用100块钱买鸡,价格如下:公:5$, 母:3$, 小:1$两只, 让你求一共多少种买法?
编一个p,怎么编?求教!

[ Last edited by anqing on 2007-2-7 at 11:46 AM ]

2007-2-7 10:59
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
namejm
荣誉版主

batch fan


积分 5226
发帖 1737
注册 2006-3-10
来自 成都
状态 离线
『第 2 楼』:  


@echo off
setlocal enabledelayedexpansion
for /l %%i in (0,1,20) do (
    for /l %%j in (0,1,33) do (
        for /l %%k in (0,2,100) do (
            set /a money=5*%%i+3*%%j+%%k/2
            set /a chook=%%i+%%j+%%k
            if !money! equ !chook! if !money! equ 100 (
                set /a num+=1
                echo !num!: %%i+%%j+%%k
            )
        )
    )
)
echo      百钱买百鸡,共有 %num% 种买法。
pause


   此帖被 +10 点积分     点击查看详情   
评分人:【 ccwan 分数: +5  时间:2007-2-7 20:56
评分人:【 redtek 分数: +5  时间:2007-2-8 21:23




尺有所短,寸有所长,学好CMD没商量。
考虑问题复杂化,解决问题简洁化。
2007-2-7 11:36
查看资料  发短消息 网志   编辑帖子  回复  引用回复
anqing
高级用户




积分 859
发帖 413
注册 2006-8-14
状态 离线
『第 3 楼』:  

还得仔细研究版主的p呀

2007-2-7 11:38
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
kernelv
初级用户





积分 47
发帖 24
注册 2007-1-9
状态 离线
『第 4 楼』:  

晕,版主贴出来了,并且我发现我把题目看错了。小鸡是1$两只。
不好意思,删了。。。

[ Last edited by kernelv on 2007-2-6 at 10:41 PM ]

2007-2-7 11:39
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
ccwan
金牌会员




积分 2725
发帖 1160
注册 2006-9-23
来自 河北廊坊
状态 离线
『第 5 楼』:  

C



三人行,必有吾师焉。   学然后知不足,教然后知困,然后能自强也。
2007-2-7 20:55
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
anqing
高级用户




积分 859
发帖 413
注册 2006-8-14
状态 离线
『第 6 楼』:  

谁能用vbs写出来?

2007-2-7 22:17
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
anqing
高级用户




积分 859
发帖 413
注册 2006-8-14
状态 离线
『第 7 楼』:  

『第 6 楼』:  

谁能用vbs写出来?

最后挺一下

2007-2-8 08:55
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
jmz573515
银牌会员




积分 1212
发帖 464
注册 2006-12-13
状态 离线
『第 8 楼』:  


for g=0 to 20
for m=0 to 33
for x=0 to 100 step 2
if 5*g+3*m+1/2*x=100 and g+m+x=100 then
n=g & "+" & m & "+" & x
s=s & n & vbcrlf
end if
next
next
next
msgbox s
[ Last edited by jmz573515 on 2007-2-9 at 11:10 AM ]

2007-2-10 00:08
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
anqing
高级用户




积分 859
发帖 413
注册 2006-8-14
状态 离线
『第 9 楼』:  

学习了

2007-2-10 00:32
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
dglsy
初级用户





积分 39
发帖 20
注册 2007-1-24
状态 离线
『第 10 楼』:  

c语言里的例子,居然让楼主演的如此漂亮,真是佩服哦。让我长了见识,谢谢楼主了

2007-2-14 07:46
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
slore
铂金会员





积分 5212
发帖 2478
注册 2007-2-8
状态 离线
『第 11 楼』:  

For i = 0 To 20  
        For j = 0 To 33
            k = 100 - i - j

2007-2-14 08:13
查看资料  发短消息 网志   编辑帖子  回复  引用回复
slore
铂金会员





积分 5212
发帖 2478
注册 2007-2-8
状态 离线
『第 12 楼』:  

For i = 0 To 20 Step 2
        For j = 0 To 33 Step 2
k = 100 - i - j

If k / 2 + 3 * j + 5 * i = 100 Then
n = i & "+" & j & "+" & k
s = s & n & vbCrLf
End If

Next
Next
For i = 1 To 19 Step 2
        For j = 1 To 34 Step 2
k = 100 - i - j

If k / 2 + 3 * j + 5 * i = 100 Then
n = i & "+" & j & "+" & k
s = s & n & vbCrLf
End If

Next
Next

MsgBox s

   此帖被 +8 点积分        点击查看详情   
评分人:【 anqing 分数: +8  时间:2007-2-15 08:02


2007-2-15 02:46
查看资料  发短消息 网志   编辑帖子  回复  引用回复
qingfushuan
高级用户





积分 502
发帖 327
注册 2006-12-30
状态 离线
『第 13 楼』:  不好意思-----------------------悄悄问一声

为啥公鸡得20只以下,母鸡33只以下呢?

2007-2-15 06:14
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
slore
铂金会员





积分 5212
发帖 2478
注册 2007-2-8
状态 离线
『第 14 楼』:  

公:5$, 母:3$

2007-2-15 06:27
查看资料  发短消息 网志   编辑帖子  回复  引用回复
qingfushuan
高级用户





积分 502
发帖 327
注册 2006-12-30
状态 离线
『第 15 楼』:  哦,

连条件都没看清楚啊

2007-2-15 07:14
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
« [1] [2] »
请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: