@echo off&setlocal enabledelayedexpansion
set/a len=1,n=1
:rep
set/a len=len+len,n=n^<^<len,1/n 2>nul&&goto :rep
:lp
(set n=
set o=
set s=
set ns=
echo.
set /p n=输入一个整数：)
(if "%n%"=="" goto :eof
for /l %%a in (1,1,!len!) do (
set/a m=n%%2,n=n^>^>1,m*=m
set s=!s!!m!
set o=!m!!o!
set/a ns=^(ns^<^<1^)+m
)
echo 正二进制：!o!   {%n%}
echo 逆转输出：!s!   {!ns!}
goto :lp)
复制代码

 
@echo off&setlocal enabledelayedexpansion
set/a len=1,n=1
:rep
set/a "len<<=1,n<<=len,1/n" 2>nul&&goto :rep
:lp
set n=&set o=&set s=&set ns=&echo.&set /p n=输入一个整数：
(if "%n%"=="" goto :eof
for /l %%a in (1,1,%len%) do (
set/a "m=n&1,n>>=1,ns=ns<<1|m"
set s=!s!!m!
set o=!m!!o!
)
echo 正二进制：!o!   {%n%}
echo 逆转输出：!s!   {!ns!}
goto :lp)
复制代码

@echo off
 set /p "value=INPUT:"
 set /a "i=1<<31",flag=1
 call :loop %i%
 pause>nul&goto :eof
:loop
 set /a "i=%1,n=i&value,i>>=1,n=!(!n)"
 if %flag% equ 1 set /a i="1<<30" &set flag=0
 if %i% neq 0 (call :loop %i% %n%) else <nul set /p=%n%
 <nul set /p=%2
复制代码

@echo off&setlocal enabledelayedexpansion
set/p a=INPUT:
set i=1
for /l %%i in (31,-1,0) do (
    set/a n=^!^(^!^(a%%2^)^)2>nul
    set/a i*=n"<<"%%i,d+=i,i=1
    set b=!b!!n!
    if !a! geq 2 (set/a a/=2)else set a=0
  )
echo Decimal:%d% &echo Binary :%b%
pause
复制代码

@echo off&setlocal enabledelayedexpansion
set/p a=INPUT:
for /l %%i in (31,-1,0) do (
    set/a "n=a&1,a>>=1,d+=n<<%%i"
    set b=!b!!n!
  )
echo Decimal:%d% &echo Binary :%b%
pause
复制代码