网站首页  词典首页

请输入您要查询的范文:

 

标题 理解约瑟夫环应用题代码
范文

关于理解约瑟夫环应用题代码

题目:

有二十九个女生(分别用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 %%b&pause&exit)

)

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 off&setlocal 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

随便看

 

范文网提供海量优质实用美文,包含随笔、日记、古诗文、实用文、总结、计划、祝福语、句子、职场文档等范文,为您写作提供指导和优质素材。

 

Copyright © 2004-2023 ixindu.com All Rights Reserved
更新时间:2025/3/26 13:58:11