首先要先明确的一点就是,如果所有数字的总和sum能被n整除,那么最大众数数量为n,否则是n-1。

因为不能整除的时候,最大众数数量肯定不能为n,这个时候我们可以想到让某一个区间的总和能够被该区间长度整除,而其他数字就不用管了

所以我们可以将一些数清到不用管的数字里,那么很明显,我们可以只清到某一个数字上面,所以最大众数长度为n-1

然后就是选择哪个数字的问题,很容易可以想到,这n-1个数字肯定要连续才是最有情况。那么那个数字就是最小值或者最大值

然后还要考虑到一点就是去掉某个数字之后我们可能需要去掉一部分数字到这个数或者从这个数拿一些数字。

以选择最大值a[n]为例子,如果是去掉一部分到最大值,那么我们只需要记录大于平均值(sum-a[n]) / (n - 1)这个平均值的总和就好。如果是从这个数拿一部分数字的话,那就是让平均值+1,然后计算大于这个平均值的总和,注意我们还需要从最大值拿取一部分数字。假如余数为k,那么我们要填补这个余数,就需要拿取n - 1 - k个数,那么就是总和 + n - k + 1

详细代码如下:

//               BggBB                wZPXsv:.         UBgQGv
//               BgEQQ            ,:sJ.    .,.  ::,    rBORZJ
//              .BgggB   .sJrc7r77:.,          .:;75as :BgOMp
//              :BgERB. 2a:          ,:.             :cEBOgMB:
//       wR:    rBODgBKL:  ,:r:     ,srLL;.        .   ,BRggBJ ;       s
//       gR1    sBgDBQi  :csLr;         ,rJ7.       ,,  BMp5QQJ;w:   :rg,
//   JRJipEs    XBRBO   7s;,               :c;        .,BE5OgB  :7L    L
//    cZQDB:    RBBP  :L;.                   :r         GBBEgQ5 .;:w
//       ..    ;DBZ  r7.         ............ :r         rBBpgBr  i.w.
//            pBBR  r;      ........,.....,....:r .        BBGEOZ  r w,
//           BQBB  :,      ..,:.................i:.,.       gBQB6B1;r 5:
//           5BB       ..:,...;.......,.,........:.     .QL  ZBRMXBB,. X.
//            B.     ... 7r ..:,...,.,....:: ....:,.XQr;BBB   EBGMB.    L
//         ,DB:     ..,. :L   ,r  ,.,.,.. :B: ....: 1BHKBQB;   RBgMES:
//     2   GB:   .  ,,.. rg  . w;.........:X2;.::::.    ,SE,    BBRBQBa
//     ;   77,  . .,,... 7S,...,5...,.,.. ;7 1: ..::...     ,.  .BMEGB:
//        sr;R . ..,.... U:S ...rr.....,. s; .Jr  .,.........,.  2QSgr ..
//       K2 X:   ,,.,.:::2 1; ..,::.......X    ri  ....,,.....,.  BJM  ..
//     ,Q7  Q   .,....c;.L .5  ..,...,.. cr .:ri2a   . ;r..,.,.,  P:P:,
//    ;H.  ra  .,.,.. H7:;  ,c   .,,,,,.:U RBBBBBBB:,. .r ....,,  r:p,;r
//         G: .i.... :s::r;2pBL:; .,,,..K. Bss5L7LEMJvrr;...:..,  ,pZ :X:
//         M  .::... 7:.7QBBBBBKBr.....sr    w:,  ,:6.r;,..::.,.  :5:  :Z
//         Q ...i,.. 1sBO::U;; :rvr:::cr     6 :HS, p  X. :;....  :U L  :
//         O ...,r.  BBP  77..,r;c .LS:      w; r;  H  1 ,;....., rJ;H
//         g ....,i, OS   ,X..7HrL   :        1r..:s. L:,;....,:. K2:.L
// .:i;:, .g  .....:;sES   L7 .,,7             ,. ,  r;,:.,..::. iE;: s.
// ;.  .ss:M; :..,...v:17   ;7,.:.  .              .7;.,.. ;7: .rD,:i; 2
//   ,.   : G:6r. ... ;7g.                       rJi:.  ,:J1:.r2,rr::v ;,
//   7v7: ;.7:7UP2i:,:rr,7          .. .::         rJrrcJsc: L;L: J;::7 r
// i....:visP.27rLJLU5r;css         ,.            ,5s,c;:,r. c..c  7;,v,
// : ,. i, ,RO.:       .E;Hw,                   .DBH7;r7.:i  X5LLU. .. r
// , ...BU.  .w:;r1r    .sr,vc:               .pBREDQBBL.;:  QBBBBBXXP7.
// , , :QBB1 ;:7v:vJ:    Jv.i1EgBgJi,     .,::.gDZKPHGBs,;  .BQMDU5GQBBB7
// , .. LDr 7rLLL,U,r.   cDQBQBRGERQBBQ,:;r7s2PDRZZpEDBL,., ,BRpZZZZOOgB7
// , .:. . DQK.r.7; r.   :gBDZpZPEpZ6gMa6RMBBQgEKZ6DDMBr,..::BEZpEGDZPPG
//   si,: :2QBac;..,r     PQgPPPEZOZDGDRRDDEGpZpOOgORBH,: ..:Qg6ZZp2JsO;
//  Q: :J7 7      .,.     6RQQDD6ZpZpZ6Z6ZpZ6gOgDOGRDR  :.  .MMOpX52UKDr
// BB7 1  .:UMOPXr        gQgEgDDZZpE6E6Z6ZPZGOpDRDUSOEHBBL  7BRP5HXXXDJ.
// GXB1  .: UBMQBBg       JB6pKpPG6O6G6EZEpEPp6MGSwPEDRQgMBP  :RPXUX6PQa;
// gXOR .,,pgGE6ODBB,      QQOZ6RMBBBQMgDZZ6ZGE21HOEZpEpEZgB,  :ZZppBQs,v
// gwXBr,;EBEEpGZGGBQ:     .RMgK7r:::i7s1HPZHDHLEGPpKpK6PpZBs .D;g6GMZ  ;

#include<bits/stdc++.h>

using namespace std;

#define int long long
#define ll long long
#define lowbit(x) x&(-x)

const int MOD=1e9 + 7;
const int N=1e6+10;

int qpow(int num,int k) {
    int res=1;
    while(k) {
        if(k%2) res = (res * num) % MOD;
        num = (num * num) % MOD;
        k/=2 ;
    }
    return res % MOD;
}

int inv(int x) {
    return qpow(x,MOD-2);
}
 
int lcm(int x,int y) {
    return x * y / __gcd(x,y);
}

mt19937 rng(chrono::steady_clock::now().time_since_epoch().count());
int Base = uniform_int_distribution<>(8e8,9e8)(rng); 

int a[N];
int b[N];

void solve() {
    int n;
    cin>>n;

    int sum = 0;
    for(int i=1;i<=n;i++) cin>>a[i],sum += a[i];

    if(sum % n == 0){
        int res = 0;
        for(int i=1;i<=n;i++) res += abs(a[i] - (sum / n));
        cout<<res / 2<<"\n";
    }
    else {
        sort(a+1,a+n+1);
        int res = 0;
        int ans = MOD * MOD;
        int k = (sum - a[1]) % (n - 1);
        int now = (sum - a[1]) / (n - 1);

        for(int i=2;i<=n;i++) if(a[i] > now) res += a[i] - now;
        ans = min(ans,res);

        res = 0;
        now = (sum - a[1]) / (n - 1) + 1;

        for(int i=2;i<=n;i++) if(a[i] > now) res += a[i] - now;
        ans = min(ans,res + n - 1 - k);

        res = 0;
        now = (sum - a[n]) / (n - 1);
        k = (sum - a[n]) % (n - 1);

        for(int i=1;i<n;i++) if(a[i] > now) res += a[i] - now;
        ans = min(ans,res);

        res = 0;
        now = (sum - a[n]) / (n - 1) + 1;

        for(int i=1;i<n;i++) if(a[i] > now) res += a[i] - now;
        ans = min(ans,res + n - 1 - k);

        cout<<ans<<"\n";
    }
}

signed main() {
    ios::sync_with_stdio(false);
    cin.tie(0);
    cout.tie(0);

    int t=1;
    //cin>>t;

    while(t--) {
        solve();
    }
    return 0;
}