#include<bits/stdc++.h>
#define pb emplace_back
#define pi pair<int,int>
#define fi first
#define se second
#define mp make_pair
using namespace std;
using ll = long long;
using db = double;

constexpr int MAXSIZE = 1 << 20;
char buf[MAXSIZE], *p1, *p2;
#define gc() getchar()//(p1 == p2 && (p2 = (p1 = buf) + fread(buf, 1, MAXSIZE, stdin), p1 == p2) ? EOF : *p1++)

int rd() {int x = 0, f = 1;char c = gc();while (!isdigit(c)) {if (c == '-') f = -1;c = gc();}while (isdigit(c)) x = x * 10 + (c ^ 48), c = gc();return x * f;}

const int N = 2e5 + 7;
int i, j, k, n, m;
int f[N], a[N], v[N], u[N];
set<int> d[N];
queue<int> q, t;

int dis(int x, int y) {return y - x + (x > y) * n;}

signed main() {
//	freopen(".in", "r", stdin);
//	freopen(".out", "w", stdout);
//	ios::sync_with_stdio(0); cin.tie(0); cout.tie(0);
	n = rd(), k = rd();
	for(i = 0; i < n; i++) v[i] = (a[i] = rd()) + i;
	for(i = 0; i < n; i++) if(i != k) d[v[i]].insert(i);
	q.push(k), t.push(k);
	while(q.size()) {
		k = q.front(), q.pop();
		i = t.front(), t.pop();
		while(!d[i].size()) {
			i = (i - 1 + n) % n;
			if(u[i]) break;
		}
		if(u[i]) continue;
		u[k] = 1;
		for(int x : d[i]) {
			f[x] = f[k] + dis(i, k) + 1;
			if(a[x]) q.push(x), t.push(x);
		}
		q.push(k), t.push(i);
		d[i].clear();
	}
	printf("%d\n", f[0]);
	return 0;
}