#include <bits/stdc++.h> using namespace std; #define ll long long #define vll vector<ll> #define len(x) (ll)x.size() const ll inf = 1e9, infl = 1e18; const ll MOD = 1e9 + 7; const ll maxn = 2e5 + 5; ll n, m, k = 0; void _() { // r = n subtasklari // Observation: eger range icinden cixaracagin ve range icine getireceyin indexleri secsen bes edir // cunki cost onlarin yerini nece deyissen de eyni qalir (eger rangeden eyni terefdedise) // n <= 13 subtaski ucun onda sadece range icinden max k dene element secsek colden optimal olan k dene // elementi secmek ucun bitmask ata bilerik cunki en pis halda n / 2 dene element secmeliyik range colunden. // Cunki, (k <= min(length of range, n - length of range)) max qiymeti ucun length of range = n / 2, // O(2^12) = O(4096), o da rahatliqla kecir. ll l, r, cm = 0; cin >> n >> l >> r >> m; vector<array<ll, 2>> v, v_; for(ll i = 1, x; i <= n; i ++){ cin >> x; if(l <= i and i <= r){ v.push_back({x, i}); cm += x; } else{ v_.push_back({x, i}); } } ll cv = cm, sz = len(v), sz_ = len(v_); for(ll msk = 0; msk < (1ll << sz); msk ++) for(ll msk_ = 0; msk_ < (1ll << sz_); msk_ ++){ if(__builtin_popcount(msk) != __builtin_popcount(msk_)) continue; ll i = 0, i_ = 0, cost = 0, sum = cm; while(i < sz and i_ < sz_){ while(i < sz and !(msk & (1ll << i))) i ++; while(i_ < sz_ and !(msk_ & (1ll << i_))) i_ ++; if(i < sz and i_ < sz_){ sum += - v[i][0] + v_[i_][0]; cost += abs(v[i][1] - v_[i_][1]); i ++, i_ ++; } if(cost > m) break; } if(cost <= m) cv = min(cv, sum); } cout << cv << '\n'; } signed main() { cin.tie(0)->sync_with_stdio(0); ll t = 1; // cin >> t; while(t --) _(); }