批處理?xiàng)钶x三角效果實(shí)現(xiàn)代碼
來源:易賢網(wǎng) 閱讀:1260 次 日期:2014-05-13 12:12:40
溫馨提示:易賢網(wǎng)小編為您整理了“批處理?xiàng)钶x三角效果實(shí)現(xiàn)代碼”,方便廣大網(wǎng)友查閱!

這篇文章主要介紹了批處理打印彩色的楊輝三角效果實(shí)現(xiàn)代碼,喜歡的朋友可以測(cè)試下

效果圖:

1.jpg

代碼如下:

@echo off&color 0e

setlocal enabledelayedexpansion

mode con: cols=130 lines=130

:top

cls

::set /p in=請(qǐng)輸入行數(shù):

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 再輸出個(gè)倒 金字塔 玩玩。

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

更多信息請(qǐng)查看IT技術(shù)專欄

更多信息請(qǐng)查看腳本欄目
易賢網(wǎng)手機(jī)網(wǎng)站地址:批處理?xiàng)钶x三角效果實(shí)現(xiàn)代碼
由于各方面情況的不斷調(diào)整與變化,易賢網(wǎng)提供的所有考試信息和咨詢回復(fù)僅供參考,敬請(qǐng)考生以權(quán)威部門公布的正式信息和咨詢?yōu)闇?zhǔn)!

2025國(guó)考·省考課程試聽報(bào)名

  • 報(bào)班類型
  • 姓名
  • 手機(jī)號(hào)
  • 驗(yàn)證碼
關(guān)于我們 | 聯(lián)系我們 | 人才招聘 | 網(wǎng)站聲明 | 網(wǎng)站幫助 | 非正式的簡(jiǎn)要咨詢 | 簡(jiǎn)要咨詢須知 | 加入群交流 | 手機(jī)站點(diǎn) | 投訴建議
工業(yè)和信息化部備案號(hào):滇ICP備2023014141號(hào)-1 云南省教育廳備案號(hào):云教ICP備0901021 滇公網(wǎng)安備53010202001879號(hào) 人力資源服務(wù)許可證:(云)人服證字(2023)第0102001523號(hào)
云南網(wǎng)警備案專用圖標(biāo)
聯(lián)系電話:0871-65099533/13759567129 獲取招聘考試信息及咨詢關(guān)注公眾號(hào):hfpxwx
咨詢QQ:526150442(9:00—18:00)版權(quán)所有:易賢網(wǎng)
云南網(wǎng)警報(bào)警專用圖標(biāo)