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

主頁 > 知識庫 > 批處理解約瑟夫環應用題代碼

批處理解約瑟夫環應用題代碼

熱門標簽:四川防封電銷卡套餐 外呼獲客系統 無錫極信防封電銷卡價格 谷歌地圖標注錯位 沈陽電銷 95專業外呼線路是怎么回事 浙江語音外呼系統招商 用電話機器人取代人工 aa專業電話外呼系統
題目:
  有二十九個女生(分別用1-29號來稱呼)圍成一圈玩報數游戲,規則是這樣的:從1開始數數,當數到3的這個人就退出游戲,而她后面的人接著從1數。。。如此一直到最后剩下一個人,現在知道最初是從13號女生開始的游戲,問最后剩下的會是第幾號女生?
要求:
  1 用批處理解答
  2 代碼簡潔高效
  3 代碼通用且不生成臨時文件
加分原則:
  以思路為重(如思路獨特,請簡要說明)
  完全符合要求的加10分

  已有兩套解決方案,見3樓more和6樓ieutk版主的代碼,但個人認為這兩套方案均不完美(見本人的跟貼評述),期
待完美方案的出現,大家加油了!??!

注:約瑟夫問題
  約瑟夫問題是個有名的問題:N個人圍成一圈,從第一個開始報數,第M個將被殺掉,最后剩下一個,其余人都將被殺掉。例如N=6,M=5,被殺掉的人的序號為5,4,6,2,3。最后剩下1號。
more:
復制代碼 代碼如下:

@echo off
set "str=13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 1 2 3 4 5 6 7 8 9 10 11 12"
:again
for /f "tokens=1,2,4*" %%a in ("%str%") do (
if not "%%c"=="" (set "str=%%c %%d %%a %%b"goto :again) else (echo %%bpauseexit)
)
 

ieutk:
復制代碼 代碼如下:

@echo off
setlocal enabledelayedexpansion
for /l %%a in (12 -1 1) do set "str= %%a !str!"
for /l %%a in (29 -1 13) do set "str= %%a !str!"

:main
set "ie=0"
for %%a in (%str%) do set /a ie+=1
if %ie% neq 1 (
for %%a in (%str%) do (
set /a num+=1
if !num! equ 3 (
set "num=0"
set "str=!str: %%a =!
)
)
goto main
)
echo %str%
pause
 

batman:
復制代碼 代碼如下:

@echo offsetlocal enabledelayedexpansion
for /l %%a in (13,1,29) do set "str=!str! #%%a#"
for /l %%a in (1,1,12) do set "str=!str! #%%a#"
:lp
for %%a in (!str!) do (
set /a n+=1
if !n! equ 3 set "str=!str: %%a=!"set /a n=0
)
for /f "tokens=2" %%a in ("%str%") do if "%%a" neq "" goto lp
echo 最后剩下的是%str:#=%號pause>nul
您可能感興趣的文章:
  • 一個報數游戲js版(約瑟夫環問題)
  • 約瑟夫環問題(數組法)c語言實現
  • C++循環鏈表之約瑟夫環的實現方法
  • 詳解約瑟夫環問題及其相關的C語言算法實現
  • java 實現約瑟夫環的實例代碼
  • python超簡單解決約瑟夫環問題
  • php解決約瑟夫環示例
  • 深入理解約瑟夫環的數學優化方法
  • 約瑟夫環問題的PHP實現 使用PHP數組內部指針操作函數
  • javascript循環鏈表之約瑟夫環的實現方法

標簽:青島 廣安 連云港 迪慶 煙臺 南平 興安盟 常德

巨人網絡通訊聲明:本文標題《批處理解約瑟夫環應用題代碼》,本文關鍵詞  批處,理解,約瑟夫,環,應用題,;如發現本文內容存在版權問題,煩請提供相關信息告之我們,我們將及時溝通與處理。本站內容系統采集于網絡,涉及言論、版權與本站無關。
  • 相關文章
  • 下面列出與本文章《批處理解約瑟夫環應用題代碼》相關的同類信息!
  • 本頁收集關于批處理解約瑟夫環應用題代碼的相關信息資訊供網民參考!
  • 推薦文章
    主站蜘蛛池模板: 泰兴市| 岳阳县| 房产| 新建县| 尼勒克县| 常熟市| 门头沟区| 兴业县| 读书| 靖宇县| 安图县| 米林县| 怀安县| 乐昌市| 高要市| 新蔡县| 塔河县| 岗巴县| 星座| 昭苏县| 龙门县| 玉溪市| 宁陕县| 东阳市| 德格县| 广东省| 东乡县| 库尔勒市| 探索| 鹿泉市| 大荔县| 当雄县| 双峰县| 乌鲁木齐市| 长沙市| 长顺县| 建阳市| 万载县| 秦安县| 侯马市| 枣庄市|