[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
做个简单的,试试
  1. @echo off&setlocal enabledelayedexpansion
  2. set /p a=请输入组合元素:
  3. set "str=%a%"
  4. set /a max=8190,min=0
  5. for /l %%a in (1,1,14) do (
  6.      set /a "num=(max+min)/2"
  7.      for /f "delims=" %%b in ("!num!") do if "!str:~%%b!" equ "" (set /a max=num) else set /a min=num
  8. )
  9. if "!str:~%num%!" neq "" set /a num+=1
  10. :1
  11. set /p b=您需要组合的字数:
  12. set d=0
  13. set "m="
  14. :2
  15. set /a c=!random!%%%num%
  16. set m=%m%!a:~%c%,1!
  17. set /a d+=1
  18. if %d%==%b% goto :3
  19. goto :2
  20. :3
  21. echo %m%
  22. pause
  23. goto :1
复制代码
1

评分人数

世界上没有学不会的知识,也没有想得到却做不到的事!

TOP

返回列表