#include <bits/stdc++.h>
// #include <atcoder/all>
using namespace std;
// using namespace atcoder;
typedef long long ll;
#define rep(i, n) for(ll i = 0, i##_len = (n); i < i##_len; i++)
#define reps(i, s, n) for(ll i = (s), i##_len = (n); i < i##_len; i++)
#define rrep(i, n) for(ll i = (n) - 1; i >= 0; i--)
#define rreps(i, e, n) for(ll i = (n) - 1; i >= (e); i--)
#define all(x) (x).begin(), (x).end()
#define rall(x) (x).rbegin(), (x).rend()
#define sz(x) ((ll)(x).size())
#define len(x) ((ll)(x).length())
#define endl "\n"
template<class T> void chmax(T &a, const T b){ a = max(a, b); }
template<class T> void chmin(T &a, const T b){ a = min(a, b); }

int main() {
    cin.tie(0);
    ios::sync_with_stdio(false);
    // ifstream in("input.txt");
    // cin.rdbuf(in.rdbuf());
    ll N; cin >> N;
    double x[N]; rep(i,N) cin >> x[i];
    ll M; cin >> M; M--;
    double ave = 0; rep(i,N) ave += x[i]/N;
    double stddev = 0; rep(i,N) stddev += pow(ave-x[i],2); stddev = sqrt(stddev/N);
    ll result = stddev<=1e-8 ? 50 : (double)50 + (x[M]-ave)*10/stddev;
    cout << result << endl;
    return 0;
}