#include <bits/stdc++.h>
using namespace std;
int main() {
int n, l, r, K;
cin >> n >> l >> r >> K;
vector<int> v(n+1);
for(int i=1; i<=n; i++) cin >> v[i];
int sum = 0;
for(int i=l; i<=r; i++) sum += v[i];
int dpL[l][n+1][K+1], dpR[n+2][n+2][K+1];
memset(dpR, 0, sizeof(dpR));
memset(dpL, 0, sizeof(dpL));
for(int i=1; i<l; i++) {
for(int j=l; j<=r; j++) {
for(int k=0; k<=K; k++) {
dpL[i][j][k] = min(dpL[i][j][k], dpL[i-1][j][k]);
dpL[i][j][k] = min(dpL[i][j][k], dpL[i][j-1][k]);
if(j - i <= k) dpL[i][j][k] = min(dpL[i][j][k], dpL[i-1][j-1][k-j+i] + v[i] - v[j]);
}
}
}
for(int i=r; i>=l; i--) {
for(int j=n; j>=r+1; j--) {
for(int k=0; k<=K; k++) {
dpR[i][j][k] = min(dpR[i][j][k], dpR[i+1][j][k]);
dpR[i][j][k] = min(dpR[i][j][k], dpR[i][j+1][k]);
if(j - i <= k) dpR[i][j][k] = min(dpR[i][j][k], dpR[i+1][j+1][k-j+i] + v[j] - v[i]);
}
}
}
int mn = min(dpL[l-1][r][K], dpR[l][r+1][K]);
for(int i=l; i<r; i++)
for(int j=0; j<=K; j++)
mn = min(mn, dpL[l-1][i][j] + dpR[i+1][r+1][K-j]);
cout << sum + mn << '\n';
return 0;
}
