网站首页  汉语字词  英语词汇  考试资料  写作素材  旧版资料

请输入您要查询的范文:

 

标题 批处理杨辉三角效果实现代码
范文
    这篇文章主要介绍了批处理打印彩色的杨辉三角效果实现代码,喜欢的朋友可以测试下
    效果图:
    
1.jpg

    代码如下:
    @echo off&color 0e
    setlocal enabledelayedexpansion
    mode con: cols=130 lines=130
    :top
    cls
    ::set /p in=请输入行数:
    set in=23&set ab=1&set var=64
    if "%in%"=="" goto top
    if %in% geq 35 goto top
    if %in% leq 0 goto top
    echo %in%|findstr /r "^[0-9][0-9]*$">nul 2>nul||goto top
    set str=1
    for /l %%i in (1,1,%in%) do (
    set num=
    set num2=0
    for %%a in (!str!) do (
    set /a num2+=1
    if !num2!==1 set "str1="
    set /a num1=%%a+num
    set "str1=!str1! !num1!"
    set num=%%a
    )
    call :lis "!str1:~1!"
    set "str=!str1! 0"
    )
    rem 再输出个倒 金字塔 玩玩。
    for /l %%a in (22 -1 1) do echo !nam%%a!
    for /l %%i in (1 1 3) do (
    for %%a in (a b c d e f) do (
    color 0%%a
    ping/n 2 127.1>nul
    ))
    exit
    :lis
    set max=%~1
    for /l %%a in (0 1 300) do (
    if not "!max:~%%a,1!"=="" set /a ci+=1
    )
    set /a ki=var-ci/2
    for /l %%a in (1 1 !ki!) do set kg= !kg!
    echo !kg!!max!
    set nam!ab!=!kg!!max!
    set /a ab+=1
    set ci=0&set kg=
    goto :eof
随便看

 

在线学习网范文大全提供好词好句、学习总结、工作总结、演讲稿等写作素材及范文模板,是学习及工作的有利工具。

 

Copyright © 2002-2024 cuapp.net All Rights Reserved
更新时间:2025/5/18 0:36:12