[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

穷举法 挨个试..

本帖最后由 jinzeyu 于 2012-2-29 11:25 编辑
  1. @echo off&setlocal enableDelayedExpansion&set str=0123456789876543210&set "ml=是三类&goto:eof"&for /l %%i in (1000,1,9999) do call:main %%i
  2. :main
  3. set i=%1
  4. set i1=%i:~0,1%
  5. set i2=%i:~1,1%
  6. set i3=%i:~2,1%
  7. set i4=%i:~3,1%
  8. if "%i%"=="8888" echo %1%ml:三=一%
  9. if "%i:~1%"=="888" echo %1%ml:三=二%
  10. if "%i:~2%"=="88" echo %1%ml%
  11. if "%i:~3%"=="8" echo %1%ml:三=四%
  12. if "%i:~2% %i2%"=="%i:~0,2% %i3%" echo %1%ml:三=二%
  13. if "%i:~1,2%"=="%i:~3%%i:~3%" echo %1%ml%
  14. if "%i:~3%"=="%i3%" echo %1%ml:三=四%
  15. for /l %%j in (0,1,16) do (
  16. if "%1"=="!str:~%%j,4!" echo %1%ml:三=二%
  17. if "%i:~1%"=="!str:~%%j,3!" echo %1%ml%
  18. if "%i:~0,3%"=="!str:~%%j,3!" echo %1%ml%)
  19. if "%i1%%i2%"=="%i4%%i3%" if not "%i1%"=="%i2%" echo %1%ml:一=四%
  20. if "%i1%%i3%"=="%i2%%i4%" if not "%i2%"=="%i4%" echo %1%ml%
  21. if "%i:~0,2%"=="%i:~2%" if not "%i1%"=="%i2%" echo %1%ml%
  22. echo %1是五类
复制代码
1

评分人数

    • batman: 书写有点不规范PB + 11

TOP

有几个问题:
  如7378算四类吗
  如1331算四类吗
  如1313算三类吗
  如1133算三类吗

TOP

回复 4# batman


    哦 我还以为也是连续数字呢

TOP

不知道有没有简洁的代码 我的太复杂了...一堆if

TOP

返回列表