Board logo

标题: 批处理计算1+2+3+4……100的值 [打印本页]

作者: 523066680     时间: 2008-2-24 12:48    标题: 批处理计算1+2+3+4……100的值
高一数学书必修三居然学编程……无奈……爽。好多数学题我都不能用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

作者: 523066680     时间: 2008-2-24 12:49
是像我这种菜菜学习for和set的好例子哦!

作者: 523066680     时间: 2008-2-24 12:50    标题: 顺便在这里发我的原创批量重命名了哈
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 )

作者: everest79     时间: 2008-2-24 13:13
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)。

作者: slore     时间: 2008-2-24 14:06
直接用set /a n=(1+100)*100/2 太没趣。 汗~ 最好的算法。。。最快。

作者: 523066680     时间: 2008-2-24 14:48
嘿嘿……探究精神,不可少……明明知道有简单的,还是要去做别的方法

作者: 40szb     时间: 2008-2-24 14:52
好,学习了

作者: moniuming     时间: 2008-2-24 14:55
@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%

作者: 523066680     时间: 2008-2-24 15:18
楼上的代码好灵活啊……我学学

作者: slore     时间: 2008-2-24 16:02
@echo off for /l %%a in (1,1,100) do set /a a+=%%a echo %a% pause

作者: 523066680     时间: 2008-2-24 16:38
学习了……自愧中……不过还是学习了!

作者: 523066680     时间: 2008-2-24 16:41
我想把11楼的代码弄的视觉一些,但是出现怪现象 @echo off for /l %%a in (1,1,100) do ( set /a a+=%%a echo.%a% ) pause

作者: 523066680     时间: 2008-2-24 16:45
又改了一下……可以了 @echo off setlocal ENABLEDELAYEDEXPANSION for /l %%a in (1,1,100) do (set /a a+=%%a &echo !a!) pause

作者: 523066680     时间: 2008-2-24 16:52
九楼的代码我理解不了啊……谁愿意解释下,这里谢谢了

作者: 523066680     时间: 2008-3-1 18:19
怎么每人离我啊……教下啊!

作者: moniuming     时间: 2008-3-2 13:26
启用命令扩展 把call :aaa %%a中的%%a这个参数带到:aaa标签后用%1代替来使用 格式: call + 标签 + 参数 不知道我是否表达清楚了 具体看帮助 call /?

作者: qcqzlj     时间: 2008-3-2 21:04    标题: 呵呵,我也来做一个
@echo off setlocal enabledelayedexpansion set s=0 for /l %%a in (1,1,500 ) do ( set /a s=%%a+!s! set d=!d!+%%a echo !d!=!s! ping -n 1 127.1 >nul cls ) echo %d%=%s% pause >nul

作者: xkofd     时间: 2008-3-2 21:05
发帖赚一分。。

作者: h2thesun     时间: 2008-3-3 11:41
@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% “set /a 参数表示进行运算(运算符参数),%1是call :aaa %%a中的%%a,也就是call :aaa带进来的参数,比如 call :aaa %%a %%b %%c...后,要引用参数则用%1 %2 %3...来表示” ------以上解释来自moniuming

作者: lmhxly     时间: 2010-10-22 20:27
@echo off set n=1 set /p n=input a number! for /l %%i in (1,1,%n%) do ( set /a sum+=%%i ) echo %sum% pause

作者: acaigg     时间: 2010-12-27 21:08
学习中

作者: 726842270     时间: 2011-1-17 10:37
无聊中,写一个
@echo off
set b=0
:1
set /a b+=1
set /a a+=%b%
if "%b%" equ "100" (echo %a% &pause&exit) else goto 1