婷婷综合国产,91蜜桃婷婷狠狠久久综合9色 ,九九九九九精品,国产综合av

主頁(yè) > 知識(shí)庫(kù) > 批處理輸出n階幻方腳本

批處理輸出n階幻方腳本

熱門標(biāo)簽:電話機(jī)器人全國(guó)招商 雷霆電銷機(jī)器人怎么樣 電話機(jī)器人產(chǎn)品怎么樣 如何申請(qǐng)400電話業(yè)務(wù)mm 清遠(yuǎn)百度地圖標(biāo)注店鋪位置 玉林市機(jī)器人外呼系統(tǒng)哪家好 呼倫貝爾外呼系統(tǒng) 如何弄地圖標(biāo)注 智能打電話機(jī)器人收費(fèi)

中國(guó)古代稱為“河圖”、“洛書(shū)”,又叫“縱橫圖”。

復(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

您可能感興趣的文章:
  • C語(yǔ)言實(shí)現(xiàn)魔方陣算法(幻方陣 奇魔方 單偶魔方實(shí)現(xiàn))

標(biāo)簽:樂(lè)山 株洲 公主嶺 白銀 江西 蕪湖 三門峽 臺(tái)州

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《批處理輸出n階幻方腳本》,本文關(guān)鍵詞  批處理,輸出,階幻方,腳本,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問(wèn)題,煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們,我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無(wú)關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《批處理輸出n階幻方腳本》相關(guān)的同類信息!
  • 本頁(yè)收集關(guān)于批處理輸出n階幻方腳本的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章
    主站蜘蛛池模板: 乐山市| 乌拉特前旗| 城固县| 丹东市| 桐乡市| 出国| 清镇市| 长岭县| 保山市| 东港市| 焦作市| 崇义县| 清水河县| 河北区| 南雄市| 读书| 安庆市| 繁峙县| 武宁县| 乳源| 永安市| 肇庆市| 屏山县| 嘉义县| 化隆| 合作市| 彰化县| 吉木萨尔县| 白玉县| 博湖县| 中山市| 万载县| 富阳市| 合肥市| 城市| 宁海县| 县级市| 漳浦县| 宜良县| 通州市| 淳安县|