校园春色亚洲色图_亚洲视频分类_中文字幕精品一区二区精品_麻豆一区区三区四区产品精品蜜桃

主頁 > 知識庫 > 批處理輸出n階幻方腳本

批處理輸出n階幻方腳本

熱門標簽:電話機器人全國招商 雷霆電銷機器人怎么樣 電話機器人產品怎么樣 如何申請400電話業務mm 清遠百度地圖標注店鋪位置 玉林市機器人外呼系統哪家好 呼倫貝爾外呼系統 如何弄地圖標注 智能打電話機器人收費

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

復制代碼 代碼如下:

@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語言實現魔方陣算法(幻方陣 奇魔方 單偶魔方實現)

標簽:樂山 株洲 公主嶺 白銀 江西 蕪湖 三門峽 臺州

巨人網絡通訊聲明:本文標題《批處理輸出n階幻方腳本》,本文關鍵詞  批處理,輸出,階幻方,腳本,;如發現本文內容存在版權問題,煩請提供相關信息告之我們,我們將及時溝通與處理。本站內容系統采集于網絡,涉及言論、版權與本站無關。
  • 相關文章
  • 下面列出與本文章《批處理輸出n階幻方腳本》相關的同類信息!
  • 本頁收集關于批處理輸出n階幻方腳本的相關信息資訊供網民參考!
  • 推薦文章
    主站蜘蛛池模板: 济源市| 河源市| 林芝县| 新乡县| 剑阁县| 临朐县| 宜川县| 平原县| 恭城| 界首市| 民勤县| 孝义市| 精河县| 香河县| 南川市| 友谊县| 洞口县| 德惠市| 遂川县| 东港市| 成武县| 台安县| 芷江| 类乌齐县| 上思县| 广安市| 琼海市| 岐山县| 芦溪县| 观塘区| 罗田县| 阳城县| 永寿县| 双辽市| 澳门| 施秉县| 山东| 吉安市| 泰宁县| 莱州市| 陆丰市|