rat

@echo off
setlocal enabledelayedexpansion
set max=0
for /f "delims=" %%a in (a.txt) do (
        for %%b in (%%a) do (
                if %%b gtr !max! set max=%%b
                set/a_%%b+=1
        )
)
echo Max: %max%

set max=0
for /f "tokens=1,2 delims=_=" %%a in ('set _') do (                
        if %%b gtr !max! set max=%%b
)
for /f "tokens=1,2 delims=_=" %%a in ('set _') do (
        if %%b equ %max% echo Number: %%a, Count: %%b
)
pause
复制代码

[ 本帖最后由 rat 于 2009-4-14 23:47 编辑 ]

rat

6L的不能处理同时出现最多次的多个数的情况；7L貌似有这个解决的意图，但改得不对