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

主頁 > 知識庫 > 批處理輸出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階幻方腳本的相關信息資訊供網民參考!
  • 推薦文章
    主站蜘蛛池模板: 山西省| 吉木萨尔县| 美姑县| 东辽县| 思南县| 南江县| 利川市| 九龙城区| 浮山县| 阳朔县| 兴宁市| 彭山县| 中西区| 天长市| 陈巴尔虎旗| 苍南县| 汤阴县| 怀仁县| 福泉市| 苏尼特左旗| 绥滨县| 英山县| 清原| 江北区| 广东省| 嘉兴市| 新化县| 龙门县| 惠来县| 吕梁市| 治多县| 东乡县| 偏关县| 易门县| 正宁县| 汝阳县| 韶关市| 镇雄县| 钦州市| 囊谦县| 高台县|