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

程序23 打印菱形

  1. @echo off&setlocal enabledelayedexpansion
  2. set n=1
  3. for /l %%a in (1 1 7) do (
  4.     set /a m+=1
  5.     for /l %%i in (1 1 !n!) do (
  6.          set /p=*<nul
  7.    )
  8.    set /a n+=2
  9.    if !m! geq 4 set /a n-=4
  10.    echo.
  11. )
  12. echo.
  13. pause
复制代码

TOP

程序23 打印菱形

  1. @echo off&setlocal enabledelayedexpansion
  2. set n=1
  3. for /l %%a in (1 1 7) do (
  4.     set /a m+=1
  5.     for /l %%i in (1 1 !n!) do (
  6.          set /p=*<nul
  7.    )
  8.    if !m! geq 4 (set /a n-=2) else  set /a n+=2
  9.    echo.
  10. )
  11. pause
复制代码

TOP

23 打印真正的菱形

  1. @echo off&setlocal enabledelayedexpansion
  2. set n=1
  3. for /l %%i in (1 1 7) do (
  4.     call :b 6 4 2 0 2 4 6
  5.     set /a m+=1
  6.     for /l %%j in (1 1 !n!) do set /p v=*<nul
  7.     if !m! lss 4 (set /a n+=4) else set /a n-=4
  8.     echo.
  9. )
  10. pause>nul
  11. :b
  12. set /a x+=1
  13. call set w=%%%x%
  14. for /l %%a in (1 1 !w!) do set /p=  <nul
  15. set /p=<nul
复制代码

TOP

返回列表