
CODE: [Copy to clipboard]@echo off&setlocal enabledelayedexpansion
set num=0&set jin=0
for /l %%a in (1 1 200) do set lin=0!lin!
for /f %%i in (a.txt) do echo %%i&call :lis %%i
echo.&echo 结果等于 %num%
pause>nul
exit
:lis
set lis=
set var=!lin!%~1
set num=!lin!!num!
for /l %%a in (1 1 200) do (
set /a jie=!var:~-%%a,1!+!num:~-%%a,1!+jin
set jie=0!jie!
set jin=!jie:~-2,1!
set lis=!jie:~-1!!lis!
)
set num=!lis!
for /f "tokens=* delims=0" %%a in ("%num%") do set num=%%a
goto :eof
| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |