#include <bits/stdc++.h>
#pragma GCC diagnostic ignored "-Wunused-const-variable"
#pragma GCC diagnostic ignored "-Wunused-variable"
using namespace std;
clock_t __start;
mt19937_64 rnd(chrono::high_resolution_clock::now().time_since_epoch().count());
const long double eps = 1e-8l;
const long long INF = 1e9 + 10;
const long long MOD = 1e9 + 7;
const long double Pi = acosl(-1.0l);
int __loc = 1;
int __io_opt = 1;
int __fileIO = 0;
int __MulTest = 0;
const char* __fin = "in";
const char* __fout = "out";
const char* __err = "err";
void prec();
void load();
void solve();
void __time(string s) {
  if (!__loc) return;
  cerr << s + ". Time: " << ((long double)clock() - __start) / CLOCKS_PER_SEC
       << '\n';
}
struct app {
  void __io_set() {
    __loc = 0;
    if (__io_opt) {
      ios_base::sync_with_stdio(0);
      cin.tie(0);
      cout.tie(0);
    }
    cout.precision(9);
    cout.setf(ios::fixed | ios::showpoint);
    if (__loc || __fileIO) {
      freopen(__fin, "r", stdin);
      freopen(__fout, "w", stdout);
    }
    if (__loc) freopen(__err, "w", stderr);
  }
  app() {
    __io_set();
    __start = clock();
    prec();
    __time("Precalc finised");
    int ts = 1;
    if (__MulTest) cin >> ts;
    while (ts--) {
      load();
      solve();
    }
    __time("Program finished");
  }
};
int main() { app x; }
void prec() {}
void load() {}
vector<int> v;
int sz = 450, cnt = 0;
struct q {
  int l, r, id;
  friend istream& operator>>(istream& in, q& a) {
    in >> a.l >> a.r;
    a.l--;
    a.r--;
    a.id = cnt++;
    return in;
  }
  bool operator<(q b) const {
    return l / sz < b.l / sz || (l / sz == b.l / sz && r < b.r);
  }
};
vector<q> gg;
int cur[1000001];
long long ans = 0;
vector<long long> av;
void modify(int x, int ch) {
  ans -= 1ll * cur[x] * cur[x] * x;
  cur[x] += ch;
  ans += 1ll * cur[x] * cur[x] * x;
}
void solve() {
  int n, t;
  cin >> n >> t;
  v.resize(n);
  av.resize(t);
  for (int& i : v) cin >> i;
  gg.resize(t);
  for (q& i : gg) cin >> i;
  sort((gg).begin(), (gg).end());
  int tl = 1, tr = 0;
  for (auto& e : gg) {
    if (0) log(e.l);
    if (0) log(e.r);
    if (0) cerr << '\n';
    while (tl < e.l) {
      modify(v[tl++], -1);
    }
    while (tl > e.l) {
      modify(v[--tl], 1);
    }
    while (tr > e.r) {
      modify(v[tr--], -1);
    }
    while (tr < e.r) {
      modify(v[++tr], 1);
    }
    av[e.id] = ans;
  }
  for (auto i : av) cout << i << '\n';
}
