a亚洲精品_精品国产91乱码一区二区三区_亚洲精品在线免费观看视频_欧美日韩亚洲国产综合_久久久久久久久久久成人_在线区

首頁 > 編程 > BAT > 正文

批處理輸出n階幻方腳本

2020-07-26 20:16:26
字體:
來源:轉載
供稿:網友

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

復制代碼 代碼如下:

@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

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 成年人视频在线免费观看 | 日韩视频中文字幕 | 久久精品一 | www.色.com| 久久国产精品久久精品 | 成人精品在线 | 一级毛片免费播放 | 国产精品久久久久久久久久妞妞 | 日韩视频一区二区三区在线观看 | 日韩三级电影免费观看 | 日韩精品免费一区二区在线观看 | 日日噜| 91亚洲日本aⅴ精品一区二区 | 日本精品久久久一区二区三区 | 久久久经典视频 | 天天操夜夜操 | 伊人青青操 | 天天干天天搞天天射 | 国产一区二区三区色淫影院 | 日操 | 中文字幕在线一区 | 91香蕉| 99精品一级欧美片免费播放 | 一级片手机免费看 | 国产精品毛片一区视频播 | 成人精品视频99在线观看免费 | 久久精品一区二区三区不卡牛牛 | 欧美激情在线播放 | 国产日韩欧美在线观看 | 国产高清一区二区 | 亚洲精品久久久久久久久久久 | 男女啪啪免费网站 | 亚洲 中文 欧美 日韩在线观看 | 国产综合亚洲精品一区二 | 一级做a| 日韩视频在线观看一区 | 一区二区中文字幕 | 国产视频久久 | 久久久免费av | 欧美日韩国产欧美 | 成人国产精品久久 |