@echo off
setlocal enabledelayedexpansion
echo 正在输出请稍候...
(for /l %%i in (1000,1,10000) do (
set n=%%i
set qw=!n:-4,1!
set sw=!n:-2,1!
set gw=!n:-1,1!
if !qw!gtr !sw!(if !sw!gtr !gw!set /a m+=1 & echo %%i)
))>#a.txt
echo.>>#a.txt
echo 在1000-10000之间千位^>十位^>个位的数共有!m!个>>#a.txt
start #a.txt
把上面的内容复制到记事本另存为a.bat之后运行（1200个）