#include #define FOR(v, a, b) for(int v = (a); v < (b); ++v) #define FORE(v, a, b) for(int v = (a); v <= (b); ++v) #define REP(v, n) FOR(v, 0, n) #define REPE(v, n) FORE(v, 0, n) #define REV(v, a, b) for(int v = (a); v >= (b); --v) #define ALL(x) (x).begin(), (x).end() #define ITR(it, c) for(auto it = (c).begin(); it != (c).end(); ++it) #define RITR(it, c) for(auto it = (c).rbegin(); it != (c).rend(); ++it) #define EXIST(c,x) ((c).find(x) != (c).end()) #define LLI long long int #define fst first #define snd second #ifndef M_PI #define M_PI 3.14159265358979323846 #endif #ifndef M_E #define M_E 2.71828182845904523536 #endif #ifdef DEBUG #include #else #define dump(x) #endif #define pln(x) cout << (x) << endl #define gcd __gcd using namespace std; template constexpr T lcm(T m, T n){return m/gcd(m,n)*n;} template using V = vector; template using P = pair; template void join(ostream &ost, I s, I t, string d=" "){for(auto i=s; i!=t; ++i){if(i!=s)ost< istream& operator>>(istream &is, vector &v){for(auto &a : v) is >> a; return is;} template istream& operator>>(istream &is, pair &p){is >> p.first >> p.second; return is;} template T& chmin(T &a, const U &b){return a = (a<=b?a:b);} template T& chmax(T &a, const U &b){return a = (a>=b?a:b);} template void fill_array(T (&a)[N], const U &v){fill((U*)a, (U*)(a+N), v);} using pll = pair; LLI dp[2100][2100]; int main(){ cin.tie(0); ios::sync_with_stdio(false); int N; while(cin >> N){ vector d(N); cin >> d; sort(ALL(d), [](pll &x, pll &y){return x.snd > y.snd;}); vector sum(N+1); REP(i,N) sum[i+1] = sum[i] + d[i].snd; int camp = N / 3; REP(i,N){ REP(j,camp){ chmax(dp[i+1][j], dp[i][j]); chmax(dp[i+1][j+1], dp[i][j] + d[i].fst + d[i].snd*(i-j) + sum[N] - sum[i+1]); } } LLI ans = 0; REP(i,N) ans += d[i].fst + d[i].snd*i; dump(ans); LLI sub = 0; REPE(i,N) REPE(j,camp) chmax(sub, dp[i][j]); ans -= sub; cout << ans << endl; } return 0; }