@echo off&setlocal enabledelayedexpansion
set /p "a=数（1-99）："
set /p "loop=保留的有效数字："
set s=0&set r=&set y=!a!
:loop
if "!loop!" equ "!_loop!" goto :ans
set /a _loop+=1
for /l %%a in (1,1,10) do (
	set /a t1=s*20*%%a+%%a*%%a
	if !t1! gtr !y! (
		set /a n=%%a-1,_s=s*20*n+n*n,y=y*100-_s*100
		set r=!r!!n!&set s=!r!
		if !y! equ 0 goto :ans
		goto :loop
	)
)
:ans
echo 结果：!r:~0,1!.!r:~1!
pause>nul
复制代码