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

推算
  1. @echo off&setlocal enabledelayedexpansion
  2. set Line=15
  3. for /l %%i in (0 1 %Line%) do set k=   !k!&set /a "var%%i_0=1,var%%i_%%i=1,_%%i=%%i-1"
  4. for /l %%i in (2 1 %Line%) do (
  5.     for /l %%j in (1 1 !_%%i!) do (
  6.         set /a "var%%i_%%j=var!_%%i!_!_%%j!+var!_%%i!_%%j"
  7.     )
  8. )
  9. for /l %%i in (0 1 %line%) do (
  10.         set/a "M=(Line-%%i+1)*3"
  11.     for /l %%j in (0 1 %line%) do IF "!var%%i_%%j!" neq "" set var=!var%%i_%%j!     !var!
  12.     for %%k in (!M!) do echo !k:~-%%k!!var!&set var=
  13. )
  14. )
复制代码
计算
  1. @echo off&setlocal enabledelayedexpansion
  2. set Line=15
  3. for /l %%i in (0 1 %Line%) do set k=   !k!&set /a "_%%i=%%i-1"
  4. for /l %%i in (0 1 %Line%) do (
  5.     set/a "N=1,Var=1,M=(Line-%%i+1)*3"
  6.     for /l %%j in (0 1 !_%%i!) do (
  7.         set /a "N=N*(%%i-%%j)/(%%j+1)"
  8.         set Var=!var!     !N!
  9.     )
  10.     for %%k in (!M!) do echo !k:~-%%k!!var!
  11. )
  12. pause
复制代码
再添加一个
  1. @echo off&setlocal enabledelayedexpansion
  2. set Line=9
  3. for /l %%i in (0 1 %Line%) do set "k=   !k!"&set/a "_%%i=%%i-1"
  4. for /l %%i in (1 1 %Line%) do (
  5.     SET M1=1&set var=&set/a"M=(Line-%%i+1)*3"
  6.     for /l %%j in (1 1 %%i) do  set /a "N%%j=M%%j+M!_%%j!"
  7.     for /l %%j in (1 1 %%i) do set M%%j=!N%%j!&set Var=!var!     !M%%j!
  8.     for %%k in (!M!) do echo !k:~-%%k!!var!
  9. )
  10. PAUSE
复制代码
1

评分人数

    • HAT: 感谢分享技术 + 1

TOP

返回列表