ieutk

原帖由 freshlin 于 2008-6-27 17:19 发表
set var1=!str:%%a =!
能猜到是设置var1为除了%%a以外的值，

但是这个!str:%%a =!具体是怎么用的阿，哪位高手能给解释下

set var1=!str:%%a =!  是把变量str的值中的 %%a和后面的一空格 替换为空，并把替换后的值赋予var1

freshlin

set var1=!str:%%a =!
能猜到是设置var1为除了%%a以外的值，

但是这个!str:%%a =!具体是怎么用的阿，哪位高手能给解释下

249524324

晕,不会批处理,不过如果用C语言做的话,我立马就能全部写出来,呵呵

yharvey

向前辈学习学习。。。
楼上的结果很对。。。
可能结果:3121
猴子拿的:624，499,399,319,255
可能结果:6246
猴子拿的:1249，999,799,639,511

ieutk

【程序69】
题目：有n个人围成一圈，顺序排号。从第一个人开始报数（从1到3报数），凡报到3的人退出
　　　圈子，问最后留下的是原来第几号的那位。

@echo off&setlocal enabledelayedexpansion
for /l %%a in (100 -1 1) do set "kk= %%a !kk!"
:main
set "ie=0"
for %%a in (%kk%) do set /a ie+=1
if %ie% neq 1 call :st
echo %kk%
pause&exit
:st
for %%a in (%kk%) do (
        set /a num+=1
        if !num! equ 3 (
                set "num=0"
                set "kk=!kk: %%a =!
            )
    )
goto main
复制代码

[ 本帖最后由 ieutk 于 2008-4-18 18:31 编辑 ]

yharvey

原帖由 huajinghua 于 2008-4-11 21:55 发表
【程序80】
题目：海滩上有一堆桃子，五只猴子来分。第一只猴子把这堆桃子凭据分为五份，多了一个，这只
　　　猴子把多的一个扔入海中，拿走了一份。第二只猴子把剩下的桃子又平均分成五份，又多了
　　　一个， ...

解法与题意有点不太对。。
那位高手能给正确答案。。。

[ 本帖最后由 yharvey 于 2008-4-18 16:26 编辑 ]

huajinghua

程序20.
10米高的小球经每次弹跳后高度为原来的一半，经过10此后的高度？

由于批处理不能处理小数，所以我们可以让他变成整数，下面是我突然之间想到的。呵呵

@echo off&setlocal EnableDelayedExpansion
set a=10
for /l %%i in (1,1,10) do (
set /a a=!a!*10
set /a a=!a!/2
)
set b=0000000000!a!
set c=!b:~-10!
echo 经过10次反弹后的高度为:0.!c!米
pause

foxJL

第20题,因为批处理不能处理小数所以得出的结果不精确

@echo off
set n=100
for /l %%i in (1,1,10) do (set /a n/=2,ns+=n)
echo 共经过%ns%米 第10次反弹%n%米
pause>nul
复制代码

foxJL

第9题

@echo off &setlocal enabledelayedexpansion
for /l %%i in (1,1,8)do (
	for /l %%j in (1,1,8) do (
	set /a n=%%i+%%j,n=n%%2
	if !n! equ 1 (set/p=■<nul) else (set/p=  <nul)
	)
	echo.
)
pause>nul
复制代码

huajinghua

【程序80】
题目：海滩上有一堆桃子，五只猴子来分。第一只猴子把这堆桃子凭据分为五份，多了一个，这只
　　　猴子把多的一个扔入海中，拿走了一份。第二只猴子把剩下的桃子又平均分成五份，又多了
　　　一个，它同样把多的一个扔入海中，拿走了一份，第三、第四、第五只猴子都是这样做的，
　　　问海滩上原来最少有多少个桃子？
和程序80差不多的题目。稍加改动即可

@echo off&setlocal EnableDelayedExpansion
set a=0
for /l %%i in (1,1,5) do (
set /a a=a*5+1
)
echo 最少要!a!只桃子
pause
复制代码

随风

【程序30】
题目：一个5位数，判断它是不是回文数。即12321是回文数，个位与万位相同，十位与千位相同。
指定5位数，是不是太容易了，来个可以是任意位数的。
:

@echo off&setlocal EnableDelayedExpansion
set /p nnn=请输入一个数 &cls
set mmm=%nnn%
:loop
set bbb=%mmm:~0,1%%bbb%
set mmm=%mmm:~1%
if not "%mmm%"=="" goto loop
if "%bbb%"=="%nnn%" (echo %nnn% 是回文数) else echo %nnn% 不是回文数
pause
复制代码

huajinghua

【程序25】
题目：求1+2!+3!+...+20!的和
1.程序分析：此程序只是把累加变成了累乘。
代码:

@echo off&setlocal EnableDelayedExpansion
set a=1
set b=0
for /l %%i in (1,1,20) do (
set /a a=!a! * %%i
set /a b=!b!+!a!
)
echo 20的累积为：!b!
pause
复制代码

huajinghua

【程序21】
题目：猴子吃桃问题：猴子第一天摘下若干个桃子，当即吃了一半，还不瘾，又多吃了一个
　　　第二天早上又将剩下的桃子吃掉一半，又多吃了一个。以后每天早上都吃了前一天剩下
　　　的一半零一个。到第10天早上想再吃时，见只剩下一个桃子了。求第一天共摘了多少。
1.程序分析：采取逆向思维的方法，从后往前推断。
代码：

@echo off&setlocal EnableDelayedExpansion
set a=0
for /l %%i in (1,1,10) do (
set /a a=a*2+1
echo 倒数第%%i天时有!a!个桃子)
pause
复制代码

答案竟然是1023！
这猴子太会吃了吧

[ 本帖最后由 huajinghua 于 2008-4-11 19:51 编辑 ]

小小坏坏

找个电脑高手当师傅,有意的加236788798..............流言啊.............................

huajinghua

已将帖子题目和答案编辑好了！