#pragma GCC optimize("Ofast")
#pragma GCC target("avx2")

#define rd_init() char*rp=({char*mmap();mmap(0l,1l<<25,1,2,0,0ll);})
#define rd() ({int _v=0,_c;while(_c=*rp++-48,_c>=0)_v=_v*10+_c;_v;})
#define wt(v) ({ulong _z=v;do*--wp=_z%10+48;while(_z/=10);})
#define wt1(v) ({char wbuf[64],*wp=wbuf+sizeof wbuf;wt(v);write(1,wp,wbuf+sizeof wbuf-wp);})
#define rep(v,e) for(typeof(e)v=0;v<e;++v)
#define chmin(v,a) (v=v<=a?v:a)

typedef unsigned long ulong;

int a[200000];
int n;

void sort_aux(unsigned*a,unsigned*b){
	int c[256];
	for(int i=0;i<256;++i){
		c[i]=0;
	}
	for(int i=0;i<n;++i){
		++c[a[i]&255];
	}
	int t=0;
	for(int i=0;i<256;++i){
		int u=c[i];
		c[i]=t;
		t+=u;
	}
	for(int i=0;i<n;++i){
		b[c[a[i]&255]++]=a[i]>>8|a[i]<<24;
	}
}

void sort(){
	static unsigned b[200000];
	sort_aux(a,b);
	sort_aux(b,a);
	sort_aux(a,b);
	sort_aux(b,a);
}

int main(){
	rd_init();
	n=rd();
	rep(i,n){
		a[i]=rd();
	}
	sort();
	int h[128]={};
	rep(i,n){
		++h[rp[1]];
		rp+=4;
	}
	int p=h['d'];
	int q=h['a'];
	long z=p+q?a[p+q-1]:0;
	if(p){
		rep(i,p-1){
			z+=a[i];
		}
		if(p+q<n){
			chmin(z,a[p+q]);
		}
	}
	 wt1(z);
	_exit(0);
}