// Slower C++ solution:
#include<bits/stdc++.h>

using namespace std;

#define all(v) ((v).begin()),((v).end())

#define ll long long

#define fastIO cout << fixed << setprecision(12), ios::sync_with_stdio(false), cin.tie(nullptr), cout.tie(nullptr)

double const EPS = 1e-9, PI = acos(-1);

const int N = 4e2 + 9, M = 1e5 + 9, OO = 1e9 + 7, MOD = 1e9 + 7;

const ll inf = 1e18;



ll mem[N][N], arr[N], pre[N];



ll solve(int start, int end) {

  if(start >= end)

    return 0;

  ll& ret =mem[start][end];

  if(~ret)

    return ret;

  ret = inf;

  for (int i = start; i < end; ++i) {

    ll c1 = solve(start, i);

    ll c2 = solve(i+1, end);

    ll sumL = pre[i] - pre[start - 1], sumR = pre[end] - pre[i];

    ret = min(ret, c1 + c2 + sumL + sumR);

  }

  return ret;

}



int main() {

  fastIO;

#ifdef LOCAL

  freopen("input.in", "rt", stdin);

#endif

  memset(mem, -1, sizeof mem);

  int n;

  cin >> n;

  for (int i = 1; i <= n; ++i)

    cin >> arr[i], pre[i] += pre[i-1] + arr[i];

  cout << solve(1, n);

  return 0;

}


// Faster C++ solution for the same problem (measured speedup: 2.302973528451682x):
#include <bits/stdc++.h>

#define f first

#define s second

#define fore(i,a,b) for(int i = (a), ThxMK = (b); i < ThxMK; ++i)

#define pb push_back

#define all(s) begin(s), end(s)

#define _ ios_base::sync_with_stdio(0);cin.tie(0);cout.tie(0);

#define sz(s) int(s.size())

#define ENDL '\n'

using namespace std;

typedef long double ld;

typedef long long lli;

typedef pair<lli,lli> ii;

typedef vector<int> vi;

typedef vector<lli> vl;

typedef vector<ii> vii;

typedef vector<vi> vvi;

typedef vector<vl> vvl;

#define deb(x) cout << #x": " << (x) << endl;



const int N = 3e3+5;

const lli INF = 1e18;

const lli MOD = 1e9+7;



vi m;

vi primes(1,2);

vector<vector<ld>>nk;

void sieve(){

	m = vi(N+1,0);

	for(int i = 4; i<N; i+=2)m[i]=1;

	for(int i = 3; i*i<=N; i+=2)if(!m[i])for(int j = i*i; j<N; j+=i)m[j]=1;

	for(int i = 3; i<N; i+=2)if(!m[i])primes.pb(i);

}



void pascal(){

	nk =vector<vector<ld>>(N,vector<ld>(N,0.0));

	fore(i,0,N)nk[i][0]=nk[i][i]=1.0;

	fore(i,1,N)fore(j,1,i)nk[i][j]=nk[i-1][j-1]+nk[i-1][j];

}



lli gcd(lli a, lli b){return (b?gcd(b,a%b):a);}



lli lcm(lli a, lli b){

	if(a<b)swap(a,b);

	lli c = gcd(a,b);

	a/=c;

	return a*b;

}



int popcount(lli x) { return __builtin_popcountll(x); }



lli poww(lli a, lli b){

	lli res =1;

	while(b){

		if(b&1) res = res * a;

		a = a*a;

		b/=2;

	}

	return res;

}



lli powm(lli a, lli b){

	lli res =1;

	while(b){

		if(b&1) res = (res * a)%MOD;

		a = (a*a)%MOD;

		b/=2;

	}

	return res;

}



bool isPrime(lli x){

	if(x==1)return 0;

	for(auto i:primes){

		if(i*i>x)return 1;

		if(x%i==0)return 0;

	}

	return 1;

}



lli SUM(lli a, lli b, lli mod=MOD){

	return (a+b+mod)%mod;

}



int dx[4]={-1,0,0,1}, dy[4]={0,1,-1,0};



// ---- コーディングはここから！ ('-')7



void solve(){

	int n; cin>>n;

	vl v(n+1,0); fore(i,0,n)cin>>v[i];

	vvl dp(n,vl(n,-1));

	vl sum(n+1);

	sum[0]=v[0];

	fore(i,1,n+1)sum[i]=sum[i-1]+v[i];

	auto f=[&](auto f, int l, int r)->lli{

		if(l==r)return 0;

		if(dp[l][r]!=-1)return dp[l][r];

		dp[l][r]=INF;

		fore(i,l,r)dp[l][r]=min(dp[l][r],f(f,l,i)+f(f,i+1,r)+sum[r]-(l?sum[l-1]:0));

		return dp[l][r];

	};

	cout<<f(f,0,n-1)<<ENDL;

}



int main(){_

	//int t; cin>>t; while(t--)

	solve();

}