麻豆小视频在线观看_中文黄色一级片_久久久成人精品_成片免费观看视频大全_午夜精品久久久久久久99热浪潮_成人一区二区三区四区

首頁 > 編程 > BAT > 正文

批處理輸出n階幻方腳本

2020-07-26 20:16:26
字體:
供稿:網(wǎng)友

中國古代稱為“河圖”、“洛書”,又叫“縱橫圖”。

復(fù)制代碼 代碼如下:

@echo off
:start
set /p n=Please input your odd integer:
set /a p=n%%2
if %p% equ 0 echo Input error!&&goto start

set /a i=%n%
set /a t=(%n%+1)/2
set /a a%t%_%n%=1,temp=1,m=n-1,p=n
:repeat
set /a p-=1
if %p% lss 0 goto array
for /l %%a in (1 1 %m%) do (
   setlocal enabledelayedexpansion
   if !t! gtr %n% set /a t=1
   if !i! gtr %n% set /a i=1
   set /a s=!t!+1,q=!i!+1
   if !s! gtr %n% set /a s=1
   if !q! gtr %n% set /a q=1
   set /a a!s!_!q!=a!t!_!i!+1,t+=1,i+=1
   set /a temp+=1
   if !temp! equ %n% (
         set /a temp=1,tmp=a!s!_!q!,q-=1,i-=1
         if !q! equ 0 set /a q=n
         set /a a!s!_!q!=tmp+1
         goto repeat
)  
)
pause
:array
echo Now behold the powerful Magic Sqaure^^!:
set /a a!t!_!n!=1
for /l %%c in (!n! -1 1) do (
   for /l %%d in (1 1 !n!) do (
              set /a result=a%%d_%%c
              set /p=!result!<nul     
)
echo.
)
pause>nul

發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表
主站蜘蛛池模板: 欧美999| 日韩理论电影网 | 国产精品资源手机在线播放 | 蜜桃精品视频 | 日本一区二区视频在线观看 | 日韩视频在线观看免费视频 | 欧美三级欧美成人高清www | 欧美一级高潮 | 成人午夜激情视频 | 欧美日韩夜夜 | 国产大片中文字幕在线观看 | 亚洲国产网址 | 国产精品久久久久久久久久iiiii | 亚洲第一视频 | 国产在线一级视频 | 爱性久久久久久久 | 国产自在自线午夜精品视频在 | 久久精品亚洲精品国产欧美kt∨ | 国产成人精品区 | 最近中文字幕一区二区 | 欧美日韩一区,二区,三区,久久精品 | 国产成人精品一区二区仙踪林 | 5xsq在线视频| 免费国产成人高清在线看软件 | 最新中文字幕日本 | 欧美五月婷婷 | 黑色丝袜美美女被躁视频 | 羞羞羞羞视频 | 国产三级精品最新在线 | 欧美激情在线播放 | 久久国产免费视频 | 性欧美极品xxxx欧美一区二区 | 久草在线最新 | 久久精品男人 | 国产免费永久在线观看 | 久久国产精品无码网站 | 欧美成人高清视频 | 国产精品久久久久久久四虎电影 | 五月天影院,久久综合, | av免费在线观看国产 | 毛片免费一区二区三区 |