中国DOS联盟

高一数学书必修三居然学编程……无奈……爽。好多数学题我都不能用bat做 很不爽，所以选了一道好点的，1+2+3……100貌似简单，但还是要用上点技巧的。直接用set /a n=(1+100)*100/2 太没趣。写了代码 @echo off set a=0 set b=0 :a echo.+%a%=%b% set /a a+=1 set /a b=%b%+%a% if %a% gtr 100 (pause) else (goto :a) exit ::结合了for的 @echo off setlocal ENABLEDELAYEDEXPANSION set b=0 for /l %%a in (1,1,100) do ( set /a b=%%a+!b! echo %%a !b! ) pause \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\这个比较视觉感 @echo off set /a a=1,b=0 :a set b=%b%+%a% set /a a+=1 echo %b% ping -n 1 127.0>nul cls if %a% gtr 100 (goto :b) else (goto :a) :b set /a c=%b% echo.%b%=%c% pause \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\2 @echo off set /a a=1,b=0 :a set b=%b% +%a% set /a a+=1 echo %b% cls if %a% gtr 100 (goto :b) else (goto :a) :b set /a c=%b% echo.%b%=%c% pause

综合型编程论坛 我的作品索引

是像我这种菜菜学习for和set的好例子哦！

cn-dos论坛看到好多好的批量重命名批处理，但高手们都用上了set …… 我不懂，所以做了自己看得懂的，不过效率就比较低了。没有用上set命令哦！ \\\\\\\\\\\\\\\\\\\\\\\\\\\批量重命名1.bat \\\\\\\\\\\\\\\（重命名为1 2 3 ……10 11 这类的） @echo off ren *.jpg *.[jpg] for /l %%a in (1,1,10000) do ( ren *.[jpg] final-%%a.jpg if not exist *.[jpg] cls &color 0b &echo OK!! &pause &exit ) \\\\\\\\\\\\\\\\\\\\\\\\\\\批量重命名2.bat \\\\\\\\\\\\\\\ (重命名为001 002 003 ……这类的） @echo off ren *.jpg *.[jpg] for %%a in (0 1 2 3 4 5 6 7 8 9) do ( for %%b in (0 1 2 3 4 5 6 7 8 9) do ( for %%c in (0 1 2 3 4 5 6 7 8 9) do ( color %%b%%c ren *.[jpg] final-%%a%%b%%c.jpg if not exist *.[jpg] cls &color 0b &echo OK!! &pause &exit ) ) ) \\\\\\\\\\\\\\\\\\\\\\\\\批量重命名终版.bat \\\ (可以自己现则类型，文件类型，重命名序号的开头，如a001,a002) ::如有不足之处（可以做到改善的） 欢迎来投诉或改正 hi.baidu.com/523066680 @echo off mode con cols=77 lines=12 title 某批处理初学者 hi.baidu.com/523066680 color 0b ::====================================================================== echo. echo.步骤一、在这里输入新文件名的开头 可直接回车（即命名为000 001 002）或（0 1 2） echo. 如输入a 则会重命名为a000 a001 a002.....或 a0 a1 a2...... echo. echo.不支持特殊符号 ^> ^< ^\ ^/ ^? ^" ^: ^| ^* 输入名字后不能输空格,该批处理不判断. echo. set /p no1=请输入: ::====================================================================== cls echo. echo.步骤二、在这里输入将被重命名文件的格式 echo. echo. echo.不支持特殊符号 ^> ^< ^\ ^/ ^? ^" ^: ^| ^* 空格,或是直接回车。该批处理不判断. echo.&echo. set /p no2=请输入: if not exist *.%no2% (cls &echo 不存在%no2%格式的文件，请正确输入,按任意键退出 &pause>nul &exit) if /i %no2%==bat (cls &echo 不支持重命名bat格式文件（本文件会被重命名，导致....） &pause &exit) cls ::====================================================================== :Second cls echo.执行的时候显示“存在一个重名文件，或是找不到文件”请不要马上关闭，等待执行 echo. echo.选择模式a:重命名成000 001 002,限制为999个文件（可更改） echo.选择模式b:重命名为1 2 3 4 5 ....,限制为10000个文件（可更改） echo. set /p action="在此输入:" if /i "%action%"=="a" (goto :ren1-1) if /i "%action%"=="b" (goto :ren2-1) else (goto :second) ::====================================================================== :ren1-1 cls ren *.%no2% *.[%no2%] for %%a in (0 1 2 3 4 5 6 7 8 9) do ( for %%b in (0 1 2 3 4 5 6 7 8 9) do ( for %%c in (0 1 2 3 4 5 6 7 8 9) do ( color %%b%%c &title %%a%%b%%c.%no2% echo. %no1%%%a%%b%%c.%no2% ren *.[%no2%] %no1%%%a%%b%%c.%no2%>nul 2>nul if not exist *.[%no2%] cls &color 0b &echo OK!! &pause &exit ) ) ) ::======================================================================= :ren2-1 ren *.%no2% *.[%no2%] for /l %%a in (1,1,10000) do ( echo. %no1%%%a%no2% ren *.[%no2%] %no1%%%a.%no2%>nul 2>nul if not exist *.[%no2%] cls &color 0b &echo OK!! &pause &exit )

FOR /L %variable IN (start,step,end) DO command [command-parameters] 该集表示以增量形式从开始到结束的一个数字序列。 因此，(1,1,5) 将产生序列 1 2 3 4 5，(5,-1,1) 将产生 序列 (5 4 3 2 1)。

直接用set /a n=(1+100)*100/2 太没趣。 汗～ 最好的算法。。。最快。

嘿嘿……探究精神，不可少……明明知道有简单的，还是要去做别的方法

好，学习了

@echo off set aa=0 for /l %%a in (1,1,100) do ( call :aaa %%a ) pause goto :eof :aaa set /a aa=%1+%aa% echo %aa%

楼上的代码好灵活啊……我学学

@echo off for /l %%a in (1,1,100) do set /a a+=%%a echo %a% pause

学习了……自愧中……不过还是学习了！

我想把11楼的代码弄的视觉一些，但是出现怪现象 @echo off for /l %%a in (1,1,100) do ( set /a a+=%%a echo.%a% ) pause

又改了一下……可以了 @echo off setlocal ENABLEDELAYEDEXPANSION for /l %%a in (1,1,100) do (set /a a+=%%a &echo !a!) pause

九楼的代码我理解不了啊……谁愿意解释下，这里谢谢了

怎么每人离我啊……教下啊！