WHY

@if (0)==(0) echo off
cscript //nologo //e:jscript "%~f0" < a.txt & pause & exit
@end

var s = WScript.StdIn.ReadAll().replace(/[\r\n]/g, '');
s = s.match(/./g).sort().join('');
var re = /(.)(\1)*/g, n = 0, map = {}, ar;
while(ar = re.exec(s)){
    if (ar[0].length >= n){
        n = ar[0].length;
        map[n]=map[n]?ar[1]+','+map[n]:ar[1];
    }
}
WScript.Echo('最多: ' + map[n] + '\n个数: ' + n)
复制代码