123
返回列表 发帖
batman

Rank: 8Rank: 8

帖子
2702 
积分
14562 
技术
177  
捐助
630  
注册时间
2008-6-16 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2012-12-18 10:07 | 只看该作者

【练习-070】批处理最简代码实现1至100的连加

出题目的：
　　展示技术，拓展思路
加分原则：
　　满分20分，成功完成连加计算5分，不用循环语句10分，最简代码5分
　　思路奇妙的再追加10分
题目如下：
　　在脚本之家看到vbs计算1到100连加的骨灰级代码并简化如下：
　　Dim a(101):Execute(Join(a,"s=s+i:i=i+1:")):MsgBox s
　　就请大家用批处理写出自己认为的最简代码吧！
收藏 分享
＊＊＊共同提高＊＊＊

Demon

Rank: 5Rank: 5

帖子
766 
积分
1457 
技术
119  
捐助
0  
注册时间
2010-5-12 
2楼
发表于 2012-12-18 10:46 | 只看该作者
垃圾脚本之家

http://demon.tw/programming/no-loop-calculate-1-100-sum.html
http://demon.tw

TOP

ml4516730

Rank: 1

帖子
3 
积分
19 
技术
0  
捐助
0  
注册时间
2012-12-3 
3楼
发表于 2012-12-18 12:28 | 只看该作者 
@echo off
set i=0
for /l  %%a in  (1,1,100) do set /a i=i+%%a
echo %i%
pauseCOPY
1

评分人数

TOP

batman

Rank: 8Rank: 8

帖子
2702 
积分
14562 
技术
177  
捐助
630  
注册时间
2008-6-16 
4楼
发表于 2012-12-18 12:41 | 只看该作者
楼上请检查自己的代码。。。
＊＊＊共同提高＊＊＊

TOP

cutebe

Rank: 5Rank: 5

帖子
304 
积分
1430 
技术
51  
捐助
0  
注册时间
2009-2-18 
5楼
发表于 2012-12-18 12:55 | 只看该作者
这个批处理名字有要求："C.BAT"
@SET/aA+=1,B+=A
@IF %A%==100 ECHO,%B%&PAUSE>NUL&EXIT
@CCOPY
(FOR /L %%C IN (0,1,99)DO @SET/aA+=1,B+=A)&SET B&PAUSECOPY
@SET/aB=(1+100)*100/2&@SET B&PAUSE>NULCOPY
@CMD/VON/C"(FOR /L %%C IN (0,1,99)DO SET/aA+=1,B+=A)>NUL&ECHO,!B!&PAUSE"COPY
如无特别说明，代码测试环境均为 XP SP3

TOP

ml4516730

Rank: 1

帖子
3 
积分
19 
技术
0  
捐助
0  
注册时间
2012-12-3 
6楼
发表于 2012-12-18 13:13 | 只看该作者
回复 4# batman


    我自己运行过啊,有错吗

TOP

cutebe

Rank: 5Rank: 5

帖子
304 
积分
1430 
技术
51  
捐助
0  
注册时间
2009-2-18 
7楼
发表于 2012-12-18 13:26 | 只看该作者
参考了 Seter 的
http://bbs.bathome.net/redirect. ... d=465&pid=37670
@SET/aA+=1,B+=A
@%0%A:~2% 2>NUL
@ECHO,%B%&PAUSE>NULCOPY
发现第二三行代码用&串起来还有递归效果
@SET/aA+=1,B+=A
@%0%A:~2% 2>NUL&@ECHO,%B%&PAUSE>NULCOPY
如无特别说明，代码测试环境均为 XP SP3

TOP

terse

Rank: 8Rank: 8

帖子
2339 
积分
9739 
技术
475  
捐助
0  
注册时间
2008-2-25 
8楼
发表于 2012-12-18 13:46 | 只看该作者
等差数列求和公式 不可吗

TOP

cyy998

Rank: 2

帖子
4 
积分
172 
技术
0  
捐助
0  
注册时间
2008-12-21 
9楼
发表于 2012-12-18 14:21 | 只看该作者
回复 7# cutebe

很不可思议的代码，看得我一头雾水，能解释解释么？

TOP

batman

Rank: 8Rank: 8

帖子
2702 
积分
14562 
技术
177  
捐助
630  
注册时间
2008-6-16 
10楼
发表于 2012-12-18 14:52 | 只看该作者
回复 8# terse


    直接心算然后@echo 5050
   
    ps:是不是只有题才能把你勾出来？
＊＊＊共同提高＊＊＊

TOP

batman

Rank: 8Rank: 8

帖子
2702 
积分
14562 
技术
177  
捐助
630  
注册时间
2008-6-16 
11楼
发表于 2012-12-18 14:52 | 只看该作者
回复 6# ml4516730


    是我老花眼了，不好意思。。。
＊＊＊共同提高＊＊＊

TOP

cutebe

Rank: 5Rank: 5

帖子
304 
积分
1430 
技术
51  
捐助
0  
注册时间
2009-2-18 
12楼
发表于 2012-12-18 15:09 | 只看该作者
回复 9# cyy998 


@SET/aA+=1,B+=A
@%0%A:~2% 2>NUL
@ECHO,%B%&PAUSE>NULCOPY

因为没有使用 @ECHO OFF 关闭回显，所以代之使用每句前加 @ ，这个好理解

再有就是 一、三 句仔细拆分看也好理解
第一句相当于：
SET /a A+=1　　//是 SET /a A=A+1 的简化写法，即累加或递加；下同
SET /a B+=1
第三句相当于：
ECHO %B%　　//这个显示变量 B 的值，如果这个觉得难下面不用看了
PAUSE　　　　//原句中 >NUL 把命令输出屏蔽了，下同（标记①）

难一点的是第二句
去掉 @ 与 2>NUL 后剩下
%0%A:~2%
由红蓝两部分组成，红色 %0 表示批处理本身，蓝色 %A:~2% 取变量 A 的第3个及之后的字符
实际作用中 %0 没有变化。%A:~2% 因为之前第一句代码是在做累加运算，因此变量 A 处于变化之中；
当 A 在 1 到 99 之间，%A:~2% 是空值　　//%0%A:~2% 相当于 %0，就是调用自身
当 A 等于 100 时，%A:~2% 值为 0　　//%0%A:~2% 相当于 %00，实际上找不到这个程序因此出现错误（转而运行下一句，即第三句）。
　　　　　　　　　　　　　　　　　//代码运行时看不到错误信息是因为（参看标记①）2>NUL
1

评分人数

    • batman: 美中仍有不足。。。PB + 15
如无特别说明，代码测试环境均为 XP SP3

TOP

apang

Rank: 8Rank: 8

帖子
2085 
积分
14204 
技术
665  
捐助
0  
注册时间
2011-11-27 
13楼
发表于 2012-12-18 15:37 | 只看该作者 
@set /a i+=1,s+=i,1/(i/101) 2>nul&&(echo,%s%&pause)||%0COPY
4

评分人数

    • m891319: 能算是 if else 的另外一種寫法了技术 + 1
    • cutebe: 学习了，set/a居然能只算半句技术 + 1
    • QIAOXINGXING: 学习！！！！技术 + 1
    • batman: 思路绝了PB + 30

TOP

一马平川_陈

Rank: 1

帖子
4 
积分
15 
技术
0  
捐助
0  
注册时间
2012-12-17 
14楼
发表于 2012-12-18 20:26 | 只看该作者
回复 12# cutebe


    新手，请教下，第一句为啥不只执行一次呢？

TOP

cutebe

Rank: 5Rank: 5

帖子
304 
积分
1430 
技术
51  
捐助
0  
注册时间
2009-2-18 
15楼
发表于 2012-12-18 21:39 | 只看该作者
本帖最后由 cutebe 于 2012-12-18 21:41 编辑

回复 14# 一马平川_陈


    参看第二句注释。因为第二句 %0 调用了自身（就是这个批处理本身）。相当于重复执行第一句。
@SET/aA+=1,B+=A
@ECHO,%B%
@PAUSE>NUL
@%0COPY
看以上代码，忽略 @ 符号，一二三行是顺序执行；执行到第四行时因为调用自身因此又执行第一行了。
把每行的 @ 删除再运行就看得出来了。
如无特别说明，代码测试环境均为 XP SP3

TOP

123
返回列表