中国DOS联盟

@echo off&setlocal enabledelayedexpansion

:1

cls&for %%a in (numeric1 numeric2 xxx n1 n2 #1 #2 a b z zero c mod d x mo ) do set "%%a="

echo.&echo.&echo.&set/p numeric1=     输入被除数： &echo.&set/p numeric2=     输入除数： 

echo.&set/p xxx=     输入要保留的小数点位数：



for %%a in (1 2) do echo !numeric%%a!|find ".">nul&&set n%%a=!numeric%%a:*.=!

for %%i in (1 2) do (

     if defined n%%i (

              for /l %%a in (0 1 10) do (

	if "!n%%i:~%%a,1!" neq "" set #%%i=%%a

              )

     )

)

for %%a in (1 2) do if defined #%%a (set/a #%%a+=1) else set #%%a=0

if !#1! geq !#2! (

    set/a z=!#1!-!#2!,a=%numeric1:.=%,b=%numeric2:.=%

    ) else (

    set/a z=!#2!-!#1!,a=%numeric2:.=%,b=%numeric1:.=%

)



for /l %%a in (1 1 %z%) do set zero=!zero!0

set a=%a:.=%&set b=%b:.=%%zero%

if %a% lss %b% set a=%b%&set b=%a%

set/a c=a/b

:begin

set/a mod=a%%b

set a=%mod%0

set/a d=a/b

set/a x+=1

if %x% neq %xxx% (

	set mo=!mo!%d%

	goto begin

	) else (

	if %d% geq 5 (

	set/a d+=1

	set mo=!mo!!d!

)

)

:res

if %mo:~-1% equ 0 (

	set mo=%mo:~,-1%

	goto res

)

echo.&if defined mo (echo     :   %c%.%mo%) else echo    :    %c%

pause>nul&goto 1

Originally posted by pusofalse at 2008-7-21 20:36:
不明白。。。
搞错了，应该是 for /f "delims==" %%i in ('set _') do set "%%i="
具体怎样才能清空变量？

Originally posted by zw19750516 at 2008-7-21 08:38 PM:

把你的变量都设置成set _*=，如set "_%n%=%n%"

[ Last edited by zw19750516 on 2008-7-21 at 08:45 PM ]

@echo off

for /l %%i in (1,1,10) do set "_%%i=%%i"

echo 清空前：

for /l %%i in (1,1,10) do call,echo %%_%%i%%

for /f "delims==" %%i in ('set _') do set  "%%i=" 

pause&cls&echo 清空后：

for /l %%i in (1,1,10) do call,echo %%_%%i%%

pause>nul