中国DOS联盟

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

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

游客注册登录会员网志搜索命令提示符 Bash 上传统计

中国DOS联盟论坛
现在时间是 2026-08-03 21:48

欢迎新会员 hello8888666　 RSS
共 48,038 主题排行 / 350,123 发帖 / 今日 0 篇 / 48,251 会员排行不转换/ 简体中文/ 繁體中文（台灣）/ 繁體中文（香港）

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 百钱买百鸡，共有几种买法查看 2,738　回复 16

第 16 楼发表于 2007-02-15 08:01　·　中国吉林四平联通

anqing

高级用户

★★★

积分 859
发帖 413
注册 2006-08-14 21:55
19年会员
UID 60532

状态离线

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

12楼的代码，精简了，一个for，效率大增。加分

第 17 楼发表于 2007-03-22 11:18　·　中国湖北黄冈电信

6622186

高级用户

★★★

积分 894
发帖 411
注册 2007-02-17 12:15
19年会员
UID 79697
性别男

状态离线

为什么会有0呢? 不应该都大于0?

@set c= 不知则觉多,知则觉少,越知越多,便觉越来越少. --- 知多少.
@for,/l,%%i,in,(1,1,55)do,@call,set/p=%%c:~%%i,1%%<nul&ping/n 1 127.1>nul

可打印版本 | 订阅主题 | 收藏主题

论坛跳转: