poxi

做了一下午..做出来8个...

=========
大大们帮检查...
是不是给点奖励捏.....
========
end；

rogue_1983

我真郁闷了，这是给新手做的啊？用到数学逻辑推理，而且用到很多批处理命令。我倒！

fish

@echo off
set s=1
set t=9
set p=9
set /p page=请输入辞典的页码：
set count=1

:start
if %p% geq %page% goto calc
set /a count+=1
set /a p*=10
set /a t+=p*count
goto start
:calc

set /a t-=p*count
set /a t=(page-t)/count
set /a count-=1
for /l %%i in (1,1,%count%) do set /a s*=10
set /a s+=t-1
set /p=这本辞典共有%s%页。
复制代码

dong815

能帮忙解释一下那两行吗？delims不是分割符的意思吗？我新手，怎么都看不懂

keiamy

程序6:參考了youxi01的

@echo off&setlocal enabledelayedexpansion
for /l %%i in (1 1 1000) do (
 set "flag=0"&set "a=!b!"
 set "b=!c!"&set "c=!d!"
 set "d=!e!"&set "e=%%i"
  if "!a!" geq "1" (
   set /a "num=a+b+c+d+e"
    for %%j in (4 5 6) do (
     set /a "n=!num!%%%%j"
     if !n! neq 0 set "flag=1")
     if !flag!==0 echo !a! !b! !c! !d! !e!&pause&exit))
复制代码

keiamy

@echo off&setlocal enabledelayedexpansion
for /l %%i in (1 1 1000) do (
 set /a "flag=0,num+=%%i"
 if %%i gtr 4 (
  set /a "n=%%i-5"
   for %%j in (!n!) do set /a "m+=%%j"
    set /a "num1=num-m"
     for %%k in (4 5 6) do (
      set /a "x=num1%%%%k"
      if !x! neq 0 set "flag=1")
      if !flag!==0 set "num2=%%i"&goto end))
:end
set /a "num3=num2-4"
for /l %%i in (%num3% 1 %num2%) do set /p=%%i <nul
pause>nul
复制代码

原來規律是1+2+...5=15, 2+3...+6=20,簡單複雜化了.......

keiamy

程序7:

@echo off&setlocal enabledelayedexpansion
for /l %%i in (0 1 9) do (
  set /a "num=3%%i4/2-39"
 if !num!==1%%i3 echo 1%%i3)
pause
复制代码

keiamy

程序10：

@echo off
set "num=17"
set /a "x=1,n=num/3,m=num%%3"
for /l %%i in (1 1 %n%) do (set /a x*=3)
if %m%==2 set /a "x*=2"
if %m%==1 set /a "x=x*4/3"
echo %x%
pause
复制代码

qq399254368

第二题
zhouyongjun 发表于 2009-4-13 13:22

  for /f "delims=%1" %%i in ("0123456789") do set num4=%%i
if not defined num4 echo !num1!中的 delims=%1引用的是什么哦

battab

回复 1# sjzong

程序4：

@echo off&setlocal enabledelayedexpansion
set /a shuliang=60/4
for /l %%i in (1 1 15) do (
	for /l %%j in (14 -1 0) do (
		set /a num=%%i+2*%%j,zhi=%%i+%%j
		if "!num!" == "23" (
			if "!zhi!"== "%shuliang%" (
				echo 单峰驼%%i只，双峰驼%%j只。
			)
		)
	)
)
pause>nul
exit
复制代码

qq399254368

程序4：
@echo off
set /a all=60/4
set /a a=23-all
set /a b=all-a
echo 双驼峰的数量：%a%
echo 单驼峰的数量：%b%
pause

battab

回复 27# qq399254368


    “set /a a=23-all” 这句把驼峰数减去骆驼数量得到的数a是什么东西，怎么解释？

qq399254368

第六题
::五个连续自然数的和等于第三位自然数的5倍自然被5整除，所以只要算出第三位自然数被4,6整除即可！
@echo off &setlocal enabledelayedexpansion
for /l %%a in (1,1,10000) do (
set three=%%a
set /a one=!three!-2
set /a two=!three!-1
set /a fore=!three!+1
set /a five=!three!+2
set /a var0=!three!%%4
set /a var1=!three!%%6
if !var0!==0  if !var1!==0 (
echo !one! !two! !three! !fore! !five!&goto end)
)
:end
pause

qq399254368

回复 28# battab


    不好意思，自行用了数学运算！

qq399254368

回复 29# qq399254368


    新手不知道如何取最小的数值，只能用goto了，求大神指导精简！