import os

EXT = {'cpp':'cpp', 'dpr': 'pas', 'pas':'pas', 'PAS':'pas', '.vb':'bas', '.cc':'cpp', 'txt':'pas'}
id = {}
lang = {}
users = set()
ulang = {}

for dir in sorted(os.listdir('.')):
    if dir[-3:] != ".py":
        user, prob, attempt, submit = dir.split('.')
        users.add(int(user))
        if not user + "." + prob in id or id[user + "." + prob] < int(submit):
            id[user + "." + prob] = int(submit)
            file = os.listdir(dir)[0]
            lang[user + "." + prob] = EXT[file[-3:]]
for user in users:
    userlang = set()
    for problem in '1', '2', '3', '4', '5', '6', '7', '8':
        if str(user) + '.' + problem in lang:
            userlang.add(lang[str(user) + '.' + problem])
    if len(userlang) > 1:
        userlang = {}
        userlang['cpp'] = 0
        userlang['pas'] = 0
        for problem in '1', '2', '3', '4', '5', '6', '7', '8':
            if str(user) + '.' + problem in lang:
                userlang[lang[str(user) + '.' + problem]] += 1
        if userlang['cpp'] > userlang['pas']:
            ulang[user] = 'cpp'
        else:
            ulang[user] = 'pas'
    else:
        ulang[user] = min(userlang)
countlang = {'pas': 0, 'cpp': 0,  'bas': 0}
for user in users:
    countlang[ulang[user]] += 1
print(countlang)

winners = 627, 562, 347, 366, 422, 622, 629, 224, 269, 407, 352,
442, 265, 572, 229, 675
prizers = 362, 667, 251, 466, 441, 673, 427, 261, 301, 309, 373,
263, 532, 504, 472, 524, 346, 431, 643, 543, 450, 401, 232, 461,
307, 306, 367, 101, 567, 246, 341, 545, 103, 601, 304, 566, 302,
243, 564, 365, 227, 106, 633, 446, 371, 344, 409, 449, 247, 271,
270, 226, 264, 348, 433, 203, 525, 661, 363, 102, 310, 350, 250,
467, 447, 322, 210, 222, 630, 650, 225, 648, 342, 623, 603, 469,
445, 329, 403, 465, 228, 626, 642, 571, 464

countlang = {'pas': 0, 'cpp': 0,  'bas': 0}
for user in winners:
    countlang[ulang[user]] += 1
print(countlang)

countlang = {'pas': 0, 'cpp': 0,  'bas': 0}
for user in prizers:
    countlang[ulang[user]] += 1
print(countlang)

Ну примерно вот так. Скрипт нужно запускать на архиве, скачанном c neerc, предварительно его обработав (попереименовав каталоги, удалив каталоги sources переместив файл из него в родительский каталог, изучив все возможные расширения, которые бывают у файлов - именно по ним определяется язык, удалив всякий мусор).

В результате получается каталог примерно такого вида:

105.7.8.03288/main.cpp
105.7.9.03313/main.cpp
106.1.1.00030/A.dpr
106.1.2.00045/A.dpr
106.2.1.00537/B.dpr

и т.д.

Вот на нем и запускается скрипт.