#include <cstdio>
#include <cstring>
#include <algorithm>
using namespace std;
typedef long long ll;
typedef unsigned long long ull;
inline void read(int &x){
    x=0;char ch;bool flag = false;
    while(ch=getchar(),ch<'!');if(ch == '-') ch=getchar(),flag = true;
    while(x=10*x+ch-'0',ch=getchar(),ch>'!');if(flag) x=-x;
}
#define rg register int
#define rep(i,a,b) for(rg i=(a);i<=(b);++i)
#define per(i,a,b) for(rg i=(a);i>=(b);--i)
const int maxn = 100010;
ll a[maxn],b[maxn],c[maxn];
int main(){
    freopen("fans.in","r",stdin);
    freopen("fans.out","w",stdout);
    int n,q;read(n);read(q);
    int x;
    rep(i,1,n){
	a[i] = a[i-1];b[i] = b[i-1];c[i] = c[i-1];
	read(x);
	if(x == 1) ++ a[i];
	if(x == 2) ++ b[i];
	if(x == 3) ++ c[i];
    }
    int l,r;
    while(q--){
	read(l);read(r);
	printf("%lld %lld %lld\n",a[r]-a[l-1],b[r]-b[l-1],c[r]-c[l-1]);
    }
    return 0;
}