#include <bits/stdc++.h>
using namespace std;
const int N = 1e6 + 5;
int n, m, a[N], l[N], r[N], L[N], R[N];
int64_t it[N * 4], lz[N * 4], ans[N];
vector<int> ql[N], qr[N];
void Down(int k, int l, int r, int m) {
  lz[((k) << 1)] += lz[k];
  it[((k) << 1)] += lz[k] * (m - l + 1);
  lz[((k) << 1) + 1] += lz[k];
  it[((k) << 1) + 1] += lz[k] * (r - m);
  lz[k] = 0;
}
void update(int k, int l, int r, int u, int v) {
  if (v < l || r < u) return;
  if (u <= l && r <= v) {
    lz[k] += 1;
    it[k] += r - l + 1;
  } else {
    int m = (l + r) >> 1;
    Down(k, l, r, m);
    update(((k) << 1), l, m, u, v);
    update(((k) << 1) + 1, m + 1, r, u, v);
    it[k] = it[((k) << 1)] + it[((k) << 1) + 1];
  }
}
int64_t get(int k, int l, int r, int u, int v) {
  if (v < l || r < u) return 0;
  if (u <= l && r <= v) return it[k];
  int m = (l + r) >> 1;
  Down(k, l, r, m);
  return get(((k) << 1), l, m, u, v) + get(((k) << 1) + 1, m + 1, r, u, v);
}
int main() {
  scanf("%d%d", &n, &m);
  for (int i = 1; i <= n; ++i) scanf("%d", a + i);
  for (int i = 1; i <= m; ++i) scanf("%d", l + i);
  for (int i = 1; i <= m; ++i) scanf("%d", r + i);
  for (int i = 1; i <= n; ++i)
    for (L[i] = i - 1; L[i] >= 1 && a[L[i]] < a[i]; L[i] = L[L[i]])
      ;
  for (int i = n; i >= 1; --i)
    for (R[i] = i + 1; R[i] <= n && a[R[i]] < a[i]; R[i] = R[R[i]])
      ;
  for (int i = 1; i <= m; ++i) {
    ql[l[i]].push_back(i);
    qr[r[i]].push_back(i);
    ans[i] = r[i] - l[i] + 1;
  }
  memset(it, 0, sizeof(it));
  memset(lz, 0, sizeof(lz));
  for (int i = n; i >= 1; --i) {
    if (i + 1 < R[i]) update(1, 1, n, i + 1, R[i] - 1);
    for (int j : ql[i]) ans[j] += get(1, 1, n, i + 1, r[j]);
  }
  memset(it, 0, sizeof(it));
  memset(lz, 0, sizeof(lz));
  for (int i = 1; i <= n; ++i) {
    if (i - 1 > L[i]) update(1, 1, n, L[i] + 1, i - 1);
    for (int j : qr[i]) ans[j] += get(1, 1, n, l[j], i - 1);
  }
  for (int i = 1; i <= m; ++i) printf("%I64d ", ans[i]);
}
