#include <bits/stdc++.h>
using namespace std;
int _toggle(int N, int pos) { return N = N ^ (1 << pos); }
int _set(int N, int pos) { return N = N | (1 << pos); }
int _reset(int N, int pos) { return N = N & ~(1 << pos); }
bool _check(int N, int pos) { return (bool)(N & (1 << pos)); }
bool _upper(char a) { return a >= 'A' && a <= 'Z'; }
bool _lower(char a) { return a >= 'a' && a <= 'z'; }
bool _digit(char a) { return a >= '0' && a <= '9'; }
int dx[] = {1, -1, 0, 0, -1, -1, 1, 1};
int dy[] = {0, 0, 1, -1, -1, 1, -1, 1};
int n, m, B, a[200005], cnt[1000005];
long long ans, out[200005];
struct Q {
  int l, r, id;
} q[200005];
bool cmp(Q a, Q b) {
  if (a.l / B != b.l / B) {
    return a.l < b.l;
  }
  return a.r < b.r;
}
void add(int x) {
  ans += 1LL * x * (cnt[x] * 2 + 1);
  ++cnt[x];
}
void del(int x) {
  ans -= 1LL * x * (cnt[x] * 2 - 1);
  --cnt[x];
}
int main() {
  ios_base::sync_with_stdio(0);
  cin.tie(0);
  cin >> n >> m;
  B = sqrt(n) + 1;
  for (int i = 1; i <= n; i++) {
    cin >> a[i];
  }
  for (int i = 1; i <= m; i++) {
    cin >> q[i].l >> q[i].r;
    q[i].id = i;
  }
  sort(q + 1, q + m + 1, cmp);
  int l = 1, r = 0;
  for (int i = 1; i <= m; i++) {
    while (l > q[i].l) add(a[--l]);
    while (r < q[i].r) add(a[++r]);
    while (l < q[i].l) del(a[l++]);
    while (r > q[i].r) del(a[r--]);
    out[q[i].id] = ans;
  }
  for (int i = 1; i <= m; i++) {
    cout << out[i] << '\n';
  }
  return 0;
}
