#pragma GCC optimize("Ofast")
#include <bits/stdc++.h>
using namespace std;
#define INF (1e9)
#define rep(i, n) for(int i = 0; i < (int)(n); i++)
#define all(x) x.begin(),x.end()
const long double PI = acos(-1.0L);
const long long MOD = 1000000007LL;
// const long long MOD = 998244353LL;
typedef long long ll;
typedef pair<int, int> pii;
typedef pair<long long, long long> pll;
template<class T> inline bool chmax(T &a, T b) { if (a < b) { a = b; return true;} return false; }
template<class T> inline bool chmin(T &a, T b) { if (a > b) { a = b; return true;} return false; }
////////////////////////////////////////////////////////////////////////////////////////////////////////

int main() {
    ios::sync_with_stdio(false); cin.tie(nullptr);
    int N; cin >> N;
    vector<ll> A(N);
    rep(i,N) cin >> A[i];

    sort(all(A));
    ll K = accumulate(all(A),0LL);
    ll ans = 0;
    for (ll i = N; i >= 3; i--) {
        if (i%2==0) {
            K -= (A[N-i/2]*i/2LL + A[i/2-1]*i/2LL);
            chmax(ans,K);
            K += A[N-i/2]*i/2LL + A[i/2-1]*i/2LL;
            K -= A[N-i/2];
        } else {
            K -= A[(i-1)/2]*i;
            chmax(ans,K);
            K += A[(i-1)/2]*i;
            K -= A[(i-1)/2];
        }
    }

    cout << ans << endl;
}