30分求调（subtask3 WA，subtask4 TLE）

#include<bits/stdc++.h>
using namespace std;
const int N=1e7+2;
long long n,n2,a1[N],a2[N],sum;int i=0,j=0,k,w;
int read(int x = 0) {
	char ch = getchar();
	while(ch < 48 || ch > 57) ch = getchar();
	while(ch >= 48 && ch <= 57) {
		x = x * 10 + (ch ^ 48);
		ch = getchar();
	}
	return x;
}
void write(int x) {
	if(x > 9) write(x / 10);
	putchar(x % 10 ^ 48);
}
int main() {
	n=read();
	memset(a1,127,sizeof(a1));
	memset(a2,127,sizeof(a2));
	for(int i=0; i<n; i++) {
		a1[i]=read();
	}
	sort(a1,a1+n);
	for(k=1; k<n; k++) {
		w=a1[i]<a2[j]?a1[i++]:a2[j++];
		w+=a1[i]<a2[j]?a1[i++]:a2[j++];
		a2[n2++]=w;
		sum+=w;
	}
	write(sum);
	return 0;
}