keen

@echo off&setlocal enabledelayedexpansion
set num=1
:start
set /a sum=0,a=0,n+=1,num*=2
:loop
set v=!num:~%a%,1!
if "%v%"=="" goto next
set /a sum+=v,a+=1
goto loop
:next
if %n% geq 30 pause &exit
if %sum%==%n% echo %num%
goto startCOPY

[ 本帖最后由 keen 于 2009-5-18 23:03 编辑 ]

keen

再来

@echo off&setlocal enabledelayedexpansion
set a=1
for /l %%i in (1 1 30) do (
    set /a n=%%i,a*=2,sum=0
    for /l %%j in (0 1 9) do (
        set var=%%j
        call :lp   
)
if !n!==!sum! echo !a!
)
pause&exit/b
 
:lp
set s=!a:~%var%,1!
if not defined s goto :eof
set /a sum+=sCOPY