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